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1. ABSTRACT 


aN TIVE TEST NGS Df Cones TOA RASSEUS 
SUBSYSTER. THE DRIVES MAY Be CONTROLLED BY EITHER AN RHI 

OR AN RH70. IN ADDITION TO ORMING AN EN oes To 
THE DISK DRIVES ON Is I TO BE 


BTR Gene Wate ARO SEEK ERNGR RATE" SEE Emme RATE SPPEIP ICA TONS). 
Ge EITHER SINOE Ok DUAL PORT UNITS OURL PORT DRIVES APE TESTED 


THE PROGRAM FROM 
ie rence 4 MILL SEREISE A FIXED SYSTEM OF DUAL PORT AND SINGLE” 


a Nt ge ce gt A 
AEM WB ie DER te ee ADE! 
NIGER oF ERnors IN RNY OF SEVERAL SEVERAL “CATEGORIES, 


OnivE EXCEEDS VE IS AUTOMA pT er ee re RAY OVERRIDE 
SIeLUS Cae reer ery ie GRERCTIED, OF RELEST TRO THE 
CER SB hy BS A ee 
pee N prea Corns ARE USED Use Rie ng hit Fae tr ari 


Rech [ORATE OFFSET 
NG ERROR ee toueay 


aes eras Garon eas Gee OR THE 
WRITE CHECK COMMANDS. THE WRITE CHECK COMMANDS ARE USED TO VERIFY 
A PREVIOUS WR’’" OPERATION. THUS, WHEN A WRITE COMMAND IS SELECTED, 
THE DATR WRITIk.i IS VERIFIED BY THE SE OROPRIATE WRITE CHECK 
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DEPENDING UPON WHETHER PROGRAM HAS BEEN LOADED VIA APT AUTOMATIC 
MODE OR APT DUMP MODE WILL DETERMINE WHETHER: PROGRAM/ 
COMMUNICATIONS ARE THROUGH THE KEYBOARD, DYNAMIC PROGRAM OPTIONS 
AEE SSE T YEE VIA SWITCH REGISTER TTS. AND ERRORS ARE REPORTED 


ALL COMMANDS, DATA PATTERNS, AND DATA BUFFER SIZES ARE SELECTED 
RANDOM. ¥ BY THE PROGRAM. ADDITIONALLY THE ADDRESSES (EG, CYLINDER, 
, AND SECTOR) FOR EACH OPERATION ARE SELECTED RANDOMLY. 
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11 PROCESSOR 
1 Reon (20K IF THE PROGRAN IS INCLUDED IN AN ’XXDP’ CHAIN 


PROGRAM LOADI 
KW1i-L_ OR KW11-P CLOCK 
RH11 RH70 WITH 1 RMO3 DISK DRIVE 


ONAL MEMORY TO A MAXIMUM OF 28K 
ADDITIONAL RMO3’S ON THE SAME RH11 OR RH70 


MEDIA 

THE RMO3 PERF EXERCISER PROGRAM REQUIRES FORMATTED DISK 
PACKS GENERATED BY THE RMO3 FORMATTER PROGRAM (MD-11-DZRMA-A). 
THE PACKS MUST BE FORMATTED IN 32 SECTOR (16 BIT) MODE; THE 
ALTERNATE (30 SECTOR - 18 BIT ) MODE IS NOT SUPPORTTED. 


PRELIMINARY PROGRAMS 
RMO3 DISKLESS DIAGNOSTIC 
RMO3 FUNCTIONAL TEST 


SEQ 0005 
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3. OPERATING THE PROGRAM 


~ IT Tay ee ONBED FROM THE, APPROPRIATE. “XX SOP? NEDIA USING Roce TATED 
ee Le ee Py hem Ep 


none 10 sith. peOen. BE eA FYFE HIM Ee 
NA ek 


3.2 te TELETYPE. DIAGLOGE AT LacaroN 200.8, i IN 


furor 
akan 
ono 


SRN ROSS 


IS gt D 

e THE PROGRAM “TES! 

231 TION TO at DRIVES UNDER TESTING AT THE 200(8) STARTING 
LOCATION AUTOMATICALLY. 


3.3 START THE PROGRAM AT LOCATION 204(8) IF THE RH11 OR THE RH70 IS 
NOT AT ADDRESS 176700. 


3.4 Robe, OF THE DiAuiOsTI¢ 1s ALR LOADED AND STARTED VIA THE APT DUMP 
MODE OR THE DIAGNOSTIC IS RUNNING IN ne ALONE 


OPERATIONS ARE INITI 

TCH REGI TINGS. IF ¥ IS PROGRAM’S FIRST START, 
fie ane * sien aiicy Sel SELECTED SUBSYSTEM WILL BE 
TYPED OUT. ON SUBSEQUENT oS rAgTS: TH THIS TYPEOUT MAY BE INHIBITED 


BY SETTING SW<Oe>= 1. 


S LOADED VIA APT SCRIPT MOOe Ail Sete 
i E TABLE. 
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3.5 PASS/TEST TERMINATION 


MORE THAN 1 SEEK 
SEEKS DETERMINING A PASS WERE SELECTED 
LEVEL THAT THE DRIVE IS PERFORMING TO THE 


3.5.1 PASS TERMINATION 


END OF PASS FOR A SINGLE DRIVE MAY BE DETERMINED BY EITHER OF THE 
FOLLOWING CONDITIONS. THE END OF PASS CONDITION USED IS DETERMINED 
BY PARAMETER "ENDING’. 


RRR REO LSU ER OE Se aR OREO ARAM ES 


A. IF PARAMETER ENDING’ IS 1, END OF PASS OCCURS WHEN THE DRIVE 
HAS READ 1.875 X 10?8 WORDS (3 X 10t9 BITS) 
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3.5.2 


3.6 


3.6.1 


3.6.2 


3.7 


B. IF PARAMETER ’ENDING’ IS 0, END OF PASS OCCURS WHEN THE DRIVE 
HAS PERFORMED 3 X 10t6 SEEKS. 


TEST TERMINATION 

THE TEST FOR A DRIVE IS TERMINATED (SW<O4> = 0) WHEN: 
A. THE DRIVE HAS COMPLETED THE NUMBER OF PASSES SPECIFIED IN 
B. THE TOT ACCUMULATED EXCEED 100. 


C. A FATAL ERROR OCCURS: EMle OR EM14. 
D. OPERATOR DEASSIGNS THE DRIVE 


RUN TIME 
THE EXERCISER ag A OR THE MODE IS 
pA BS N PARAMETER *SIZE’. IF ’SIZE’ IS ONE 


IN A SEEK HEAVY MODE: IF ’SIZE’ APPROACHES 
ie t CTR Ack IN seat Lett ) THE THE PROGRAN RUNS IN A DATA TRANSFER 
HEAVY MODE. TIME VARIES TLY DEPENDING ON 

TEEN ROE iON RODE SELECTED. THE AVAILABLE OVER 16K 
READ/WRITE RATIO PARAMETER - ’RATIO’, AND BY SWITCHES O, 1 
DATA TRANSFER MODE 

1 DRIVE - APPROXIMATELY 3.6 HRS (TO REACH 1.875 X 10t8 WORDS) 


TO 
8 DRIVES - APPROXIMATELY 16 HRS (FOR ALL DRIVES TO REACH 1.875 X 10t8 WORDS) 


IF_THE PROGRAM IS RUN WITH BOTH SW<O0> AND SW<O1> 
SET, THE RUN TIMES SHOULD BE ABOUT 20% FASTER. 


SEEK VERIFICATION MODE 


pees ter ‘RAKTRK” = 1 3 (256 WORDS) 


PARAMETER *MAXSEC’ = ’MINSEC’ 
SW<O0> = 1 (READ ONLY MODE) 


1 oaTve - APPROXIMATELY 2S HRS (3 X 10t6 SEEKS) 
8 DRIVES - APPROXIMATELY 40 HRS (3 X 10t& SEEKS FOR ALL DRIVES) 
UNIBUS & VECTOR ADDRESSES 


THE PROGRAM ASSUMES THE FOLLOWING UNIBUS AND VECTOR ADDRESSES. —? 
TO SECTION 4.2.2 FOR THE LOCATIONS AT WHICH TO CHANGE THESE ADDRESSES. ) 


UNIBUS VECTOR 
UNIT ADDRESS ADDRESS 
RH11 OR RH70 176700 2s4 
TTY PRINTER 177564 NOT USED 


JOl 
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TTY KEYBOARD 177560 60 
KWLI-L 177546 100 
KWL1-P 172542 104 
3.8 DUAL PORT OPERATION 


3.9 


3.10 


Sot E REP PRN RE A Asad Maat al ue EEE REELS CE ey ias d : 


A. LOAD THE RMO3 PERFORMANCE EXERCISER PROGRAM INTO BOTH 


SSORS. 
SWITCH THE *CONTROLLER SELECT’ SWITCH TO ’A/B’ ON EACH DRIVE 
oe as ee ee oe ee Pe CYCLE THE DRIVES 


C. START THE PROGRAM IN EACH PROCESSOR. RUN THE PROGRAM AS THOUGH 
EACH PROCESSOR WERE RUNNING INDEPENDENTLY OF THE OTHER. 


APT 


THIS PROGRAM IS APT COMPATIBLE TO THE EXTENT THAT APT HOOKS WILL 
BE IN THE PROGRAM AND WILL WORK THRU THE ’OPTION INTERFACE’. 


FOR OTHER INTERFACES.APT MAY ONLY LOAD AND START THE PROGRAM. 
I.E. LOAD AND DUMP MODE. 


AUTOMATIC MODE (MONITOR) 


1. THE INPUT DIALOGUE IS BYPASSED. 
2. THE BUSS ADDRESS AND CONTROLLER INTERRUPT VECTOR IS 


DEFAULTED. 
DUMP MODE: INPUT DIALOGUE AFTER PROGRAM STARTS 
APT ETABLE DEFINITIONS 
THE FOLLOWING DEFINITIONS ARE VALID FOR SPECIFYING APT 
ENVI NTAL_TABLE (ETABLE) ENTRIES, VIA RUNNING 
THE APT UTILITY PROGRAM “TSP”: 
1. SOFTWARE ENVIRONMENT: 


= 1 IF APT SCRIPT MODE 
= i IF STANDLONE MODE 


2. ENVIRONMENT MODE: 


BIT 7 = 1 ETABLE DOES SIZING 
= 0 PROGRAM DOES SIZING 


0 
BITG =) ON S S TO APT IF SCRIPT MODE 
= 0 DON’ S30. 0 APT 
1 
0 


SUPPRESS CONSOLE OUTPUT 
ALLOW CONSOLE OUTPUT 


BIT 4 TO BIT 1 ARE NOT USED 
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3. 


10. 


ll. 


le. 


13. 


14. 


PEWVIROWENT MODE BIT? (SIZING BIT ) IS SET TO. 
eR. ae a 


SWITCH 2 (USER SWITCH REGISTER) 
NOT USED 

CPU OPTIONS 
NOT USED 


MEMORY TYPES 1-4 AND MAX MEMORY ADDRESSES 
NOT USED 


INTERRUPT VECTOR 1 
USED WHEN ENVIRONMENT MODE BIT 7 = 1;DEFAULT 


BUS PRIORITY 1: 
INTERRUPT VECTOR 2: 
NOT USED 


BUS PRIORITY 2 
NOT USED 
BASE ADDRESS: 

USED WHEN ENVIRONMENT MODE BIT 7 = 1;DEFAULT 


DEVICE _MAP: 
NOT USED 


CONTROLLER DESCRIPTOR WORDS: 
NOT USED 


CONTROLLER DESCRIPTOR WORDS: 
NOT USED 


1, 


254 


176700 
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= 9%. CONTROLLING THE PROGRAM 

427 

4 THE FOLLOWI CONVENTIONS ARE USED BY THE KEYBOARD ENTRY 
m?, ROUTI IN : 

431 A. TO AN INCORRECT CHARACTER FROM 

4 ‘ *~(7RO’). TYPING A ’RO’ WILL DELETE SUCESSIVE CHARACTERS 
mr FROM THE INPUT.” 

ms B. TO DELETE AN ENTIRE LINE, TYPE A ’CONTROL U’ (’fU’). 

439 : © PERIOD’ THE "PERIOD" TERRINATION is RECOGNIZED BY T 

4 IS TERHINATED 
a Se ee ee P 
ie FOR ANY IN 

44 

444 

3 

mad 4.1 DATE & OPERATOR IDENTIFICATION 

ma Fg THE DIAGNOSTIC HAS BEEN L 

451 


£ 
ot 


4.2 PARAMETERS 


SEECHETERPESOIEADS 


IF 
AS A 


<= 
N“N 
_ 


WAIT FOR THE ENTRY. 


SELLE 
BIS VHA waa 


AN ENTRY STRING, TYPE A 


~_ WILL DEFAULT TO’ THE PRELOADED VALUE 


D+ flint RETURN To cB P THE GROUP BEING’ ENTERED. 


Asx FOR DATE ee ea i ua ees bin ENTRIES 
ARTED. ) 


T_ STAR 
ENTRIES AR ARE OPTIONAL, AND FAY 
N RESPONSE TO THE 


ii 
aoe 
2 
2 
Ze 
Ras 


8 CHARAC OF DATE INFORMATION AND UP T 
IDENTIFICATION MAY BE ENTERED. BOTH THE 
WILL BE TYPED WHEN THE ’SA’ COMMAND IS PREFORMED 


WHEN THE PROGRAM IS STARTED FROM LOCATION 204 
ASKED TO ENTER PARAMETERS. 


ENTER PARAMETERS: 


THE OPERATOR MUST ENTER A_’Y’ _——e TED BY_A CARRIAGE 
PARAMETER Tait A 
PROGRAM 


THE FOLLOWING MES 


NO’ 
GIVEN BELOW, DISPLAY THE CURRENT 


ENTRY IS NOT CORRECT AND WAIT FOR AC 


NOTE: WHEN THE DIAGNOSTIC IS 
ARE LOADED FROM THE APT arate Fon 
SuITCH REGISTER. THEREFORE A WORS 
THE E TABLE FOR NORMAL AUTOMATIC OPERATION. 


SEQ 0010 
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SRSSSRRSRRE ; 


SESSRRE ON 


is 


Sas rece 


UU UUTUU Cnn 
2 
WONT ULE Wr 


RRS Ene MOONE ees 


NS 
if 
J 
& 
e 


Ba 
; 
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ENDING 


FORMAT 


RATIO 


MESSAGE 
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DEFAULT VALUE 
VALUE § RANGE 

(SEE NOTE) 

1 1 - 999 

S 0 - 256 
000000 0 OR 1 
000001 0 OR 1 
000001 0 OR 1 
000003 0-7 
000001 0 OR 1 





SEQ 0011 
FUNCTION 
CONTROLS THE Wax MUM BUFFER 
SIZE FOR DATA TRANSFERS 
NUMBER OF PASSES TO END OF 
: INTERVAL (IN 
MI ) AUTOMATIC ¥ 
PR ATED OUT IF sr eH? <0 
F s DATA 
S RANDOMLY 


MATE 
RATIO OF READ TO MALTE 
. 

VALUE R/W RATIO 

0 15/1 

1 7/1 

- 6/2 

3 S/3 

+ 4/4 

= 7/5 

& 2/6 

7 1/7 


IF PARAMETER = 1, DO NOT PRINT 
BCCUR reat Wt Arrone D FTreD 
BY ts SpERATOR AS Bao PAC 
LOCATION. 

IF TER = 0, PRINT ERROR 
MESSAGES ASSOCIATED WITH BAD 
PACK LOCATIONS. 
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4.2.2 


PATTERN 10 oooo00 oO - 15 IF PARAMETER=0, DATA 
PATTERN IS RANDOMLY 
0, SPECIFIES 
S PATTERNS. 
DATA PATTERN 
IS THE PARAMETER 
HEADER 8 000001 0 OR 1 IF i RANDOM 
DATA S 
USED IN © 


DhTe aLOck TS is (Se IN 
NOTE: ft ra Wa TA MAXIM BUFFER SIZE WHICH 
VALE Toe fey seecIry OF PRY GTIER Fk patra a sees AS THE 


TIAL VALUE OF *AXDL’ DETERRINED BY PROGRAM. 


PERIPHERAL ADDRESSES AND OTHER LOCATIONS OF INTEREST 


TO ALTER THESE LOCATIONS, THE OPERATOR MUST MAKE ENTRIES 
BEFORE THE PROGRAM IS STARTED. THE KEYBOARD ENTRY ROWTINE DOES 
NOT PROVIDE ACCESS TO THESE LOCATIONS. 


Loc TAG CONTENTS FUNCTION 


1160 S$TKS 177560 areTUS rectarer 
STKB 


4 TPS 177554 
TPB 17238 tty Pe 
SLKCSR 1 oe aS eae Apes 


S ' 177846 rate Kink Fs REGISTER 


SLLVEC 100 KW11-L righ at 
74 (60 DECIMAL) TE SYSTEM IS 60 HZ; 
62 (SO DECIMAL) IF SYSTEM IS SO HZ. 


THE RH11-RH70 po AN a Ry ly Bag 
IS STARTED FROM +o ION 204(8) OR IF THE PROGRAM DOES NOT RECEIVE 
A RESPONSE WHEN IT ACCESSES THE DEFAULT RH11-RH70 ADDRESS. 


a 
5 
. 


4.2.3 PARAMETERS FOR THE FIRST OPERATION 


THE FOLLOWING PARAMETERS ARE USED FOR THE INITIAL OPERATION (IN 
ADDITION TO THE ’MINIMUM’ ADDRESS VALUES). 


SEQ 0012 





3 
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INITIAL 
Loc TAG VALUE RANGE 


iS14 BEGPAT 10 1 - 15 





1516 BEGCOD 5 0-5 


BECP REG Reese eR LS 


1S20. «= BEGSIZ = ‘We 2 - SIZE 





4.3 SWITCH REGISTER SETTINGS 


COS SKK Kw 
ee ee ee 
WOnrouw cWwlr-O 


Et «15> = 1 T ERR 

SH to) = it) AINA OTHE TELETYPE BELL IF ERROR 

SW <7) =1 tg Ae ERRORS 

SW <6) = 1 OPERATION PARAMETERS 

Sw <S> =1 ee SPLAY IF ERROR; DO NOT DISPLAY 

cw) =1 COUNT CHECK: DO NOT DEASSIGN 

ou «a> = 1 au Hy esnon (Ger tere Rete ATTEMPTS) 

OR 'NCF’ ERRORS OR AFTER THE 28TH 

pt ree 3 Gic7s Ser, DISPLAY REST 

SW <2> = 1 ATUS TYPEOUT DU DURING STARTUP. 

SUPAARY TYPE OUTS. 

SW <l> =1 cue Pose one ON AFTER READ ORDERS 

SW <> =1 

IF THE PROGRAM IS BEING RUN ON A SHIT PROCESSOR (I.E. AN 11/34) 

THe PROGRAM WILL Me THAT THE SWITCH REGISTER 1S 


Seine” hee Een aR a 


RebOGNT Ze re fs GALED,gY,IYEING f F PRCEPT i EN te pee te i . 
Ble reat erect le ol te aucele eege 
Ae AN OCTAL URGENT IN RESPONSE TO THE PROMPT FROM THE. SHITCH 


620 
bel 
bee 
623 
624 
5 
628 
629 
630 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
64e 
643 
644 
645 
646 
647 
648 


EACH TIME SWITCH SETTINGS ARE ENTERED, THE ENTIRE SWITCH REGISTER 








— roe re A alta EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 1S SEQ 0014 


gl ENTERED. LEADING ZEROS ARE NOT REQUIRED. *RUBOUT’ AND 
MAY BE USED TO CORRECT TYPING ERRORS 
651 DURING SulTCH ENTRY. 


652 
eT ete SWITCH a ts fg Sart ihe 


ON 
REGI 


ead aac STEN REGISTER TEEN Eepth hove BE TO oe 
4.4 ai COMMANDS 


ph ete er cen at WILL BE DISABLED IF DIAGNOSTIC IS 


THROUGH THE KEYBOARD COMMANT Te Te IY lias DRIVES 
FOR TEST (°T’ COMMAND), LTE’ oat gt A PACKS (’W* COMMAND), 


PERFORM WR 1 OSrRAND” ) 
PERE OR A A Sherrie est Oe 8 Pax CR (*R’ eet) REQUEST A DRIVE 
PERFORMANCE (*S’ COMMAND), on DEASSIGN A ORIVE WHICH IS 
BEING TESTED. READI READING, CR WRITING’ (’D’ COMMAND). 


AFTER THE PROGRAM HAS BEEN INITIALIZED, THE FOLLOWING MESSAGE 
WILL BE TYPED: 


RO RE PAT Bh Eos 


KEYBOARD ‘aoe WILL 12" BE RECOGNIZED yor IL ne. PERaTOR LL 
A *CONTROL C een hee 


aaa a us ee AND WALT UNTIL 


OLLOWING PROMPTING MESSAGE 


BER ORREBR Bsa sno e Orne OSE oom ROD 


631 AVAILABLE DRIVES HAVE BEEN PROCESSED. 

693 THE WT’, °T? AND °R’ COMMANDS REQUIRE ADDRESS LIMITS, DRIVE I.D, 
bat AND BAD Locatton AbORESS ENTRIES FOR THE DRIVE BEING REFERENCED. 

636 THE PROGRAM WILL FIRST ASK FOR ADDRESS LIMITS WITH THE FOLLOWING 

6 TYPEOUT: 


*ENTER ADDRESS LIMITS FOR DRV #N / RMO3 
THE PROGRAM WILL REQUEST VALUES FOR THE FOLLOWING ADDRESS LIMIT 
PARAMETERS. 


SaRees 


DEFAULT VALUE 


? 


saeea @ 


NNNNN 
Ceo 
fwrre-o 


725 


Haass SRA ESASAONOA TERS BONO 


ey 


35 
3 


F 
Ba 


s) 
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NAME § BASE VALUE § RANGE FUNCTION 
mf 64 EB OR ee 
in i a ee 

A eR: Bcecpecar eA 
MAXSEC 10 31 0 - 3l THE MAXIMUM SECTOR 


NOTE: 1. THE ADDRESS LIMITS ARE IN DECIMAL 
2. THE MINIMUM CYLINDER, TRACK BE 
Tread deers fee ivenies, “ne Prout eee EN 
ADDRESSES BETWEEN *MIN’ ADDRESS AND THE UPPER 


EACH COMMAND, EXCEPT THE 'S’ AND THE 'D’ COMMANDS, WILL ASK FOR 
mR ORI IDENTIFICATION any THE DRIVE IDENTIFICATION ENTRY 
RE S MADE BY OLLOWING : 


= 
~ 
o 
pl 
% 
2 

- 

te 


TO THE 1.0. REQUEST. ° 


Coes dy BER Se EN SS SEP 


USED TO ASSIGN A DRIVE(S) FOR TEST. THIS COMMAND IS REQUIRED TO 

ORM THE TEST OF THE DRIVE(S). THE OTHER COMMANDS ARE CONVIENCE 
COMMANDS OR SUPPORT COMMANDS. 
FORMAT: TN<CR> 


N = DRIVE NUMBER. MAY BE 0 T0 7 0R ’A’. ENTRY MUST BE 
TERMINIATED BY A CARRIAGE RETURN <CR>. 


EXAMPLE: TO<CR> - ASSIGN DRIVE O FOR TEST 
TACCR> - ASSIGN ALL AVAILABLE DRIVES FOR TEST 


NOTE: DRIVE OPERATION BEGINS IMMEDIATELY 
AFTER COMMAND IS ENTERED. 


*D’ COMMAND 
USED TO DEASSIGN A DRIVE(S) BEING EXERCISED. 
FORMAT: DN<CR> 


festesleelesTeelss] 
ant at ant ant ott 
CWMflWwre 
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= DRIVE NUMBER. MAY BE 0 TO 7 OR ’A’. ENTRY MUST BE 
TERMINIATED BY A CARRIAGE RETURN <CR>. 


PanPre: BAcGRD = Benssian ALL BRIVES BEING 


NOTES: 1. IF THE er REFERENCES A 
DRIVE_NOT ASSI THE PROGRAM 
WILL TYPEOUT ’?DRIVE NOT ASSIGNED’ 


2. De Ree WILL BL,  Paaioes AS THEIR 


3. IF °DA’ IS USED, ALL DRIVES BEING TESTED 
WILL BE OEASSIGNED; THE MESSAGE IN (1) WILL 
BE DISPLAYED FOR ALL DRIVES NOT BEING TESTED. 
4.4.3 °S’ COMMAND 
USED TQ REQUEST A PERFORMANCE SUMMARY TYPEOUT FOR THE REFERENCED 


DRIVE ( 

FORMAT: SN<CR> 

N = DRIVE NUMBER. MAY BE 0 T0 7 OR ’A’. ENTRY MUST BE 
TERMINIATED BY A A CARRIAGE RETURN <CR>. 

EXAMPLE: SO<CR> - TYPEOUT PERF SUMMARY FOR DRIVE 0 


SA<CR> - TYPEOUT PERF 
FOR ALL DRIVES BEING TESTED. 


NOTES: 1. Na ofee B yaeD ONLY DRIVES BEING TESTED WILL 


2. *MINUTE’ Pg Fo THE PROGRAM 


JOR RM eri cot bai RA RAR RAR ae ad to 


Hi ALOR Pw ees ae ANE BESTS 
: * Hefei OPP ks Tea 


€ 
+ 


Bate. OPERATOR. 1.0. DRIVE 
1B: GOSLERGY BETYGDRE NST "EP TAonIMEsC are Been PeeTeD 
4.4.4 WM? COMMAND 


TO WRITE A DATA PACK WITH DATA ACCEPTABLE TO THE RMO3 PERFORMANCE 
EXERCISER PROGRAR. 


See ruet 


FORMAT: WN<CR> 


N = DRIVE NUMBER. MAY BE 0 TO 7 OR ’A’. ENTRY MUST BE 
TERMINATED BY A CARRIAGE RETURN <CR>. 


Won 


NSS S PRE CORR C DN DoS SeA LOH SRB AROS Soe CoO eR 
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4.4.5 


4.4.6 
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EXAMPLE: WA<CR> - WRITE DATA PACKS ON ALL SVAILABLE DRIVES. 
WO<CR> - GENERATE A DATA PACK ON DRIVE O. 
DATA 


BOSSES SRE Ba E> FameTEN oc 
* Bea MEE AAU tee 


jis BEEN WRITTEN BY ANY PROGRAR’ 


NOTES: 1. 


3. re. *W’ COMMAND PERFORMS A SEQUENTIAL WRITE OF THE 


USED USED FOR EacH WRITE I Fee ESTED RANDOM Y>” HOMEVER 
THE COMMAND IS SEQUENTIAL Bec yratine 
ar HINGYL?, "MINTRK’ AND CONTINUING TO "MAXCYL 


4. THE ’W’ COMMAND DOES NOT WRITE HEADERS AND ASSUMES 
THAT THE FORMAT OF THE PACK IS GOOD. 
S. THE ’W’ CANNOT BE STARTED IF SWITCH O (READ 
IF SWITCH O IS SET DURING THE 
OPERATION OF THE *W’ 


THE DRIVE PERFORMING The 
’Wl’ COMMAND WILL IGNORE THE SWITCH. 


*R’ COMMAND 


USED TO PERFORM A SEQUENTIAL READ OF THE PACK. 
FORMAT: RN<CR> 


N= OR IVE ED oY arc 0 T0 7 OR ’A’. 
TE BY A CARRIAGE RETURN <CRS. 


EXAMPLE: RA<CR> - READ COS Ot AL CE WE GATE CRIES. 


ENTRY MUST BE 


RO<CR> - READ PACK ON DRIVE 
NOTES: 1. THE PROGRAM WILL PERFORM A NORMAL CHECK OF ALL DATA 
READ. HOWEVER, ALL OPERATIONS WILL BE SEQUENTIAL. 
2. THE PROGRAM MTatncies, RINTRK” To THE, AODRESS Speci 
SPECIFIED BY 'MINCYL’, "MINTRK? CIFIED 
BY ’MAXCYL’, "MAXTRK’. THE READ WILL BE SEQUENT 
*WT’ COMMAND 


USED TO PERFORM A SEQUENTIAL WRITE PACK AND FOLLOWED BY 
A” TEST” COMMAND 


FORMAT: WTN<CR> 


SEQ 0017 


‘ 


BRIERE ROSES RATER SORTA ER Baa ISS : 


uv 
ba 
eo 


: 


8 
Ms 


y 
8 


3 
: 


8.4.7 
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N= DRIVE NUMBER O TO 7 OR “A”. ENTRY MUST BE TERMINATED BY A 
CARRIAGE RETURN <CR>. 


EXAMPLE: WTA<CCR> -WRITE ALL 


WTO<CR>-WRITE PACK BANC fee PRK O a 


GENERAL COMMAND INFORMATION 
A. CONTROL-C MUST BE ENTERED BEFORE ISSUING ANY COMMAND. 


8. 1,R,W AND IVE TO ONE ANOTHER 
Oa te oe DRTUe UNDER TESTING. 
D COMMAND MUST BE ENTERED IN ORDER TO SWITCH COMMANDS 
AMONG 7,R,M AND WT . 
C. § COMMAND CAN BE ENTERED ANY TIME DURING THE TEST. 


D. THE ERROR RESPONSES FROM THE PROGRAM ARE AS FOLLOWS 


RESPONSE COMMAND (S ) 
?UNIT N OFFLINE T, W, R,WT 
?UNIT N NOT 1g Dd, S$ 
?UNIT N Y ASSIGNED T, W, R,WT 
?UNIT N NOT PRESENT T, W, R,WT 
?UNIT N UNSAFE T, W, R,WT 
?UNIT N NOT AN RMO3 T, W, R,WT 


SEQ 0018 


MD-11 
DZRMBA 


-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 20 SEQ 0019 
-Pll  27-SUL-77 08:04 
S. PERFORMANCE SUMMARY TYPEOUT 
it: gene SYERCISED, v Bags SUPPER MILL iti 3 ‘Bisrueveb futoraticny 
F THE PARAMETER ’T IS NOT_ZERO 


SL Mel clk a A 


4 
ONOU CWO 


Maa EES EE St RA SL yin iss aS Cn USN 


ry 
N 





$.2 
5.2.1 HARD ERRORS 


5.2.2 SOFT ERRORS 


a ‘ os Fee ae Re DURING 


READ HEADER & DATA, OR 


WRITE URITE DATA 
D. ‘*DTE’ ERRORS WiC CORRECTED OR WHICH BECOME ECC CORRECTABLE 
*DCK’ ERROR DUR Ne THE RETRY SEQUENCE. 


3 


ee ee a a 
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6. DATA CHECKING & ERROR RECOVERY 


6.1 DATA COMPARISON 


DATA COMPARISON ona AFTER EACH ’RDDAT’ (READ DATA) OR ’ROHD’ 
(READ HEADER AND DATA) OPERATION UNDER THE FOLLOWING CONDITIONS: 


A. THE ORDER TERMINATED WITH NO ERROR. 
THE OPERATION TERMINATED WITH *DCK’ SET AND THE ERROR 


18 coe CORMECTBLE OR THE SECTOR IN ERROR IS READ 


6.2 VERIFICATION OF DATA WRITTEN 
Bata Beck AND FaTHENG TRE OAT win One OF Tie 1 PATTER 
THROUGH ISSUING WRITE CHE 
6.3 SECTOR REFORMATTING 
FOCLOMiG COSES (PARUNETER “FORT MUST BE SET AAD SucOD) 20). 
THIS PREVENTS THE SAME ERROR FROM BEING CONTINUOUSLY REPORTED. 


6. Oe ee as EM21 
ERRORS - EMCO, EM24, EMeS, EM2b, EM27 


: ME ihe 
6.4 BAD TRACK/SECTOR FLAGGING 


SINCE THE RMO3 SUBSYSTEM tye he Ae 


TRACK/SECTOR LOCATIONS WHEN THE DRI 
ASSIGNED FOR TEST. ( SECTION 4.4 FOR ADDITIONAL INFORMATI 
I F 


e. ne FOLLOWING ERRORS OCCURS AT AL 
tte 9 , THE PROGRAM WILL INHIBIT THE ERROR REPORT FOR THA 


CRE RER RR SRE Ate die cat a : 


DATA CHECK ERRORS (’DCK’) 

WRITE CHECK ERRORS (" HCE’) 

OPERATION (OPI") 
IMING ERRORS (*DTE’) 

HEADER READ ERRORS (’FER’ & ’HCRC’, "HCE’ & "HCRC’, "HCRC’) 


OPTIONALLY, THE OPERATOR MAY REQUEST AN ERROR REPORT FOR FLAGGED 
PARAMETER ’NOTPRT’ MUST BE SET TO 0 AT STARTUP. ) THE 

Y MESSAGES IATED WITH THE PACK: THESE 
BE TO THE ERROR Ferhie MAINTAINED BY THE 


Pitan par hp hah aouh baat 
fe 
2 
$ 


oo 
—— 
-O 


: 
Bi 
d 
8 
¥3 


a] 
Re 
ee 


OoO00oO000 


Oh b FH hs ha Oe 


PRR RP LIAR SS CRAG TS RAMA T ORCS BONO TUN ics teens ike 


pe be Be be BR be bb ee te eee 
N 
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7. ERROR MESSAGES MESSAGES 
DINE PRINTER, ALL ERROR COMDITTONE Fre REPORTED IN ERROR PeSsaces; 


(RESUMTNG tne OF COURSE Mount SW<1S> IS NOT SET), AN UNRECOVERABLE 
PROGRAM CONDITION HAS OCCURRED OR A CENTRAL PROCESSOR FAILURE HAS 


ERROR MESSAGES ARE UP OF SEVERAL LI “yTFACH TYPE, OF ERROR 
HAS I NES WHICH HAY WITH IT. ALL OF THE 
POSS NES WHICH MAY APPEAR ARE GIVEN IN THE 
SECTION DESCRIBING THE PARTICULAR ERROR HEADER. 

7.1 ERROR DESCRIPTION LINES 
MESSAGES EM1, EM2, EMS, EMY, EMS, EMIO, EMI1, 8 
DISPLAYED ON’ THE TTY. ‘THE OTHER MESSAGES ARE DISPLAYED 
THE LINE PRINTER (IF AVAILABLE) OR THE TTY. 
(THE MESSAGE TAGS ARE GIVEN FOR REFERENCE. ) 
MESSAGE 
TAG TEXT 


EM1 RH11 INTERRUPT OCCURRED (RMAS=0) 
THE RH11 INTERRUPTED AND THE ATTENTION SUMMARY REGISTER 
(RMAS) WAS CLEARED. 


EMe UNEXPECTED ATTENTION OCCURRED 


THE INDICATED DRIVE INTERRUPTED BUT THE DRIVE WAS NOT 
PERFORMING AN OPERATION. 


EM3 MASSBUS PARITY ERROR (MCPE=1) 


THE RH11 DETECTED A CONTROL BUS PARITY ERROR WHEN READING 
THE INDICATED REGISTER FROM THE INDICATED DRIVE. 


EM4 MASSBUS PARITY ERROR (PAR=1) 


THE INDICATED RMO3 DETECTED A CONTROL BUS PARITY ERROR 
WHEN THE RH11 LOADED THE SPECIFIED REGISTER. 


EMS ADDRESS PLUG CHANGE BIT SET 
THE 'OPE’ BIT WAS SET WHEN THE INDICATED DRIVE INTERRUPTED. 
EMG RH11 DIDN’T RESPOND TO ADDRESSING 


WHEN THE PROGRAM ADDRESSED THE RH11, NO RESPONSE WAS RECEIVED 
FROM THE INDICATED ADDRESS. 


MD-11-DZRMB AO/OD, RMO3 PERFORMANCE EXERCISER MACY11 30(104%6) 27-JUL-77 08:07 PAGE 23 SEQ 0022 
OZRMBA.P11  27-JUL-77 08:04 


{Bes EM10 §UNCORRECTABLE MASSBUS PARITY ERROR 
THE PROGRAM HAS TRIED 3 TIMES TO READ OR WRITE THE INDICATED 
1071 REGISTER. 


EM11 FATAL MASSBUS PARITY ERROR 


A CONTROL BUS PARITY ERROR OCCURRED WHEN THE RH11 ATTEMPTED 
fo PROCESS A PREVIOUS, DIFFERENT PARITY ERROR. 


EM12 PERSISTENT DEVICE UNSAFE 
ne CLR BECAME ae gh TR DRIVE 4 ALS THE PanT DID 


TI 
AUT Dene te et Sor E DRIVE CANNOT 
a ellah ute coAOITION HAS BEEN 
EM13. OPERATION NOT COMPLETED WITHIN TIME LIMIT 


THE DRIVE DID NOT COMPLETE THE OPERATION WITHIN 1 SECOND 
AFTER THE OPERATION WAS INITIATED. 


EM14 UNIT WENT OFFLINE 
hg ¥ OFFLINE ow THE ee thm Te na 8 
{ihe 70 THe pRive, THE OPERATOR MUST — DRIVE 
WITH THe *T’ COMMAND TO RE-INITIATE TESTING 
EM1S NO RESPONSE TO PORT REQUEST 
THE PROGRAM IS TESTING A DUAL PORT DRIVE WHICH HAS NOT SWITCHED 
TO THE REQUESTING PORT WITHIN 10 SECONDS AFTER PORT REQUEST 
TO THE DRIVE FROM THE REPORTING PORT. 
EM20 HEADER CRC ERROR 
A HEADER CRC ae WAS DETECTED AT THE INDICATED ite ADDRESS. 
THE CONTENTS OF THE HEADER ARE DISPLAYED. THE OPERATION WILL 
BE RETRIED 3 TIMES. 
EM21 § DATA CHECK (’DCK’) ERROR 
A DATA CHECK ERROR WAS DETECTED AT THE INDICATED SECT 


OR. 
THE FULL QUENCE (INCLUDING OFFSET) ait BE INITIATED 
Pore SECTOR IN ERROR IF THE ECC HARD ERROR (’ECH) BIT 


PRESSRALOR A BEE SRS ORB da Io aa 


~ 
) 


bb 
= 
at 


EM22 WRITE CHECK ERROR - DATA CHECK (’DCK’) SET 


A WRITE CHECK ERROR OCCURRED ne THE DATA CHECK (’DCK’) B 
WAS SET. IF *ECH’ IS NOT SET, THE OPERATION WILL BE RETR 
UP TO 3 TIMES; IF THE "ECH’ BIT IS SET, THE OPERATION WILL 
BE RETRIED UPTO 16 TIMES. 


eee ee ae ee ae ae ee ee ee ee ee ee ae Be ee ae en ee Be ee ee ee ee 


Go be bee hee Db hh + pe he be 
OV Soo VN £W-OBS VRE 
WON £WM-O 
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EM23 WRITE CHECK ERROR - DATA CHECK (’DCK’) NOT SET 
A WRITE ERROR her Teall 
Sil SSSR ER BP 0 AS 8 
, OPERATION WILL BE RETRIED 3 TIMES. 
EM24 HEADER READ ERROR - ’FMT’ BIT DROPPED 


A WRITE DATA, WRITE CHECK D DATA, OR 8 OR A READ DATA WAS BEING 
PERFORMED AND A FMT’ 


PHATE Mth eet ial 


— 
— 


ee 
hes 


JSIRAVIASSSSSERCSSO SHANNA Se Sees eee CORO OR Un 


BE RETRIED 3 T 
EMeS emmanptncanhamy: snaedessit" aakae 
SIMILAR TO EM24, EXCEPT THAT THE "HCE’ ERROR BIT 


WAS 
SET INITIALLY. ‘THE SPERATION WILL BE RETRIED 3 TIMES. 
EM26 FORMAT ERROR (’FER’) 
FORMAT OCCURRED. WHEN THE HEADER WAS RE-READ, THE 
*HCRC’ BIT WAS NOT SET. THE CONTENTS OF THE HEADER ARE 
DISPLAYED. THE OPERATION WILL BE RETRIED 3 TIMES. 
EM27 HEADER COMPARE (’HCE’) ERROR 


SIMILAR TO EMC6 EXCEPT THAT THE ’HCE’ BIT WAS SET INITIALLY. 
THE OPERATION WILL BE RETRIED 3 TIMES. 


EM30 MISCELLANEOUS DRIVE ERROR 


THIS MESSAGE IS GIVEN FOR THE FOLLOWING ERROR BITS: 
"ROE’, RMR’, "ILF’, OR ’ILR’ 


EM31 OPERATION INCOMPLETE (’OPI’) ERROR 
TION INCOMPLETE ERROR OCCURRED AT THE INDICATED 


EM32 DRIVE TIMING (’DTE’) ERROR 


DRIVE TIMING ERROR OCCURRED ON THE INDICATED SECTOR. THE 
OPERATION WILL BE RETRIED 3 TIMES. 


EM33. PARITY (’PAR’) ERROR AFTER OPERATION STARTED 


THE 'PAR’ BIT WAS SET WHEN THE OPERATION WAS COMPLETED. THE 
OPERATION WILL BE RETRIED 3 TIMES. 


EM34 WRITE CLOCK FAILURE (’WCF’) 


A WRITE CLOCK FAILURE OCCURRED DURING THE OPERATION. THE 
OPERATION WILL BE RETRIED 3 TIMES. 


EM3S INVALID ADDRESS (’IAE’) ERROR 


Db b= bo Bs be be 0 2 Pb 0 bb = = 0 6 0 Bb 0 bb 
Ob hb bb 8 0 0 bb bb 





? 


Pb 0b 0 b= = 0 BP 0 = Bb 0 0 BP 0 OF b= 0 = 0 = 0 0 Bb 0 0 0 0 0 0 0 Bb 0 bo 0 2 2 0 be = i 
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=3 
_— 
— 


AN INVALID ADDRESS ERROR OCCURRED DURING THE OPERATION. 
EM36 WRITE LOCK (’WLE’) ERROR < 

A WRITE OPERATION WAS ATTEMPTED BUT THE DRIVE WAS WRITE 

L ° 


EM40 = RH11 «OR UNIBUS TRANSFER ERROR 


‘TRE? IS SET IN THE RH11 CONTROL REGISTER AND NO DRIVE 
ERROR HAS . THE OPERATION WILL BE RETRIED 3 
TIMES IF, THE ERROR WAS BY 'DLT’, "UPE’, 'MXF”, 


EM41 BUS ADDRESS OR WORD COUNT INCORRECT 
NO DRIVE ERROR OCCURRED BUT EITHER THE BUS ADDRESS INDICATES 
THAT AN INCORRECT NUMBER OF WORDS WERE TRANSFERED OR THE 
WORD COUNT REGISTER IS NOT ZERO. 

EM42 DATA COMPARE ERRORS - NO DRIVE ERROR DETECTED 


NO SUBSYSTEM ERROR WAS SIGNALED; HOWEVER, THE DATA DOES NOT 
COMPARE . 


EM43 § CAN’T MATCH DATA READ WITH A PATTERN 
THE DATA IN THE BUFFER DOES NOT MATCH ANY OF THE STANDARD 
PATTERNS. 


SENSES Se ORR LON eS GR PERS ; 


EM44 § ERROR BIT(S) SET, BUT NO ERROR SIGNALED BY THE RH11 
THE TION NORMALLY; HOWEVER, THE PROGRAM 
FOUND ET THER ERROR LIfe IN THE RMO3 SET OR ERROR BITS IN 
THE RH11 SET. 

EM4S ECC LOGIC FAILURE 

THE CONTENTS OF EITHER THE ECC POSITION REGISTER (RMECL) 

VALID. “The POS ITyOn Rees IS STFIER’ Ge OK > (8) 

OR THE PAT REGISTER CONTAINS ZEROS. 

BUS ADDRESS OR WORD COUNT NOT CONSISTENT 

THE PROGRAM WAS PROCESSING AN ERROR AND FOUND THAT THE 

NUMBER OF WORDS TRANSFERED AS INDICATED THE BUS ADDRESS 

REGISTER DOES NO WITH THE COUNT FROM THE 

WORD COUNT REGISTER. 

SEEK INCOMPLETE ERROR 

THE DRIVE SIGNALED EITHER ’SKI’ OR ’OCYL’ ERROR BITS. 

EMS1 NOT USED 


tTurororururufurufur 
re ee ee 
WONYIOU CWO 


SUTURE 
Z 


Be 
a 


2 
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12% 
1237 
1e38 EM60 © DEVICE ~UNSAFE 
i THE INDICATED DRIVE UNSAFE ERROR OCCURRED; THE ERROR WAS 
1241 CLEARED BY A ‘DRIVE CLEAR’ INSTRUCTION. 
7.2 DETAIL ERROR LINES 

THE LINE NUMBERS GIVEN BELOW ARE FOR REFERENCE ONLY. 

LINE 1 


TT:TT:TT (DESCRIPTION OF ERROR) 

"TT: TT: TT’ IS THE yi FiNs THE PROGRAM 
WAS STARTED. TI: TT:T GIVEN IN HOURS: 
MINUTES: SECONDS. 

LINE 2 


*PRESENT ORDER = XXXX PREVIOUS ORDER = YYYY’ 
MNEMONICS USED FOR THE ORDERS ARE DEFINED BELOW: 


iy TAL _45) rn 
WCKD - TA COCTAL 51) 
rath - mR “4 & DATA (OCTAL 53) 
T- v A COCTAL 61) s 
WRT CHECK HEADER DATA (OCTAL 6&3) 
P ROHD > READ HEADER & DATA (OCTAL 73) 


, _ (DISPLAY OF RH11 GI N TWO GROUPS: 
| RMCS1 Rrcse, APDS| MRC aME Re Cl. & RMEC2 FORM THE FIRST 
: Y THE REGISTERS IN THE FIRST GROUP WILL BE 


ee eee ee ae ee ee a ee ne ee ee Be en ee ee 


BEE RERERR TB Ia od SINS Me TERS CORUM Se wae 
z 
c 
e 
8 
Ee 
ae 


THE ABOVE LINE WILL BE TYPED IF THE ERROR OCCURRED DURING 


29 os oe 7 
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THE NON-DATA TRANSFER PART OF THE OPERATION. 


*# ERROR AT BAD TRACK/SECTOR’ 


l LINE cRIIOH TE OPERATOR tn SIBENTIEIED 68 BEING ors aN nt 
ALAS SAN 


ne BIT 8 MEANING IF BIT IS ‘1’ 
” ERO ( TS 14-9 1 SPECIFY TYPE 

19 BONE tB =} girs 6-3 SpERIFY TYPE 

zig 14 DRIVE IS OFFLINE 

a4 12 PERSISTENT UNSAFE CONDITION EXISTS 

a? 11 UNCORRECTABLE PARITY ERROR OCCURRED 

18 10 FATAL PARITY ERROR OCCURRED. MASSBUS CLEAR 

319 WAS PERFORMED 


T T WITHIN 
Oma EL SOAR SR | FO 
OUTSTANDING OPERATIONS WERE RESTARTED. 
DONE - OPERATION COMPLETED 
DATA ERROR OCCURRED DURING THE TRANSFER 


PSPC TOR On DURING REEAL TERATE OR OFFSET COMMANDS 


CORRECTABLE UNSAFE CONDITION OCCURRED 


DRIVE ERROR OCCURRED THAT CAUSED AN AUTOMATIC 
RECALIBRATE SEQUENCE 


2 PORT REQUEST TIMEOUT 
NON-EXISTENT DRIVE REQUESTED 


ERROR AT CXXX TYY SZ2Z PREV ADDR = CUUU TVV SW 


THE ACTUAL ADDRESS OF THE ERROR SECTOR AND THE PREVIOUS 
DISK ADDRESS ARE GIVEN IN THIS LINE. CYLINDER, TRACK, & 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


SEREGATS RECARO ROSE ORE 
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SECTOR ADDRESSES ARE IN DECIMAL. 


LINE 4 


PRESENT ADDR = CXXX TYY SZZ PREV ADDR = CUUU TVV SW 


THIS LNs hig lta THE ADDRESS WHEN THE ERROR WAS DETECTED: 
THE PREVIOUS ADORESS IS ALSO GIVEN. CYLINDER, TRACK, & SECTOR 
ADDRESSES ARE GIVEN IN DECIMAL. 


LINE S 


START CYL = XXX END CYL = YYY 


THIS LINE IDENTIFIES THE STARTING CYLINDER OR A SEEK ‘TMPLIED) 
AIND Lug DESTINATION CYLINDER. CYLINDER ADDRESSES ARE IN 


— 


Ri a saa dab sel ial ola at a 


LINE & 


START CYL = XXX END CYL = YYY ACTUAL CYL = 222 
THIS LINE IDENTIFIES THE STARTING CYLINDER OF AN IMPLIED SEEK, 


THE DESTINATION CYLINDER, AND THE CYLINDER THE DISK ACTUALLY 
STOPPED AT. CYLINDER ADORESSES ARE IN DECIMAL. 


RMBA = XXXX RMWC = YYYY 
EET eee eee R ONT REGRCIER TS Tins Tine 
REGIS RH11 WORD COUNT RE ° I 
NOT PRINTED IF SW<05> IS NOT SET. 


LINE 8 


START CYL = XXX START TRK = YY START SECTOR = 22 


THIS LINE IDENTIFIES THE STARTING DISK ADDRESS OF THE PRESENT 
OPERATION. CYLINDER, TRACK, AND SECTOR VALUES ARE DECIMAL. 


LINE 9 


RMDA = XXXX RMCA = YYYY 
THIS AOORESS REGIS ne CONTENTS OF THE TRACK: AND SECTOR 
SS REGISTER. i LINE 


se be eb bb tb bh be bb pe be Be be be bb pe he ee 


BROSSEIRR SOR MORIA R ERE Bad Noo san 


i 


Z2aaaAS 


eal cee 
-—O 
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LINE 10 


BUFFER ADDR = XXXX SIZE = YYYY ACTUAL NUMBR WRDS XFRD = 2272 
BUS AP EAL ae SORT OE SPATE SE UE, 
Senna wb Hanae Beh BA 


LINE 11 


GOOD DATA = XXXX BAD DATA = YYYY SECT POS = 222 
THIS LINE GIVES THE GOOD DATA, THE ACTUAL DATA FROM THE DISK 
AND THE LOCATION IN THE SECTOR OF THE ACTUAL DATA. THE SECTOR 
POSITION IS IN DECIMAL. 


LINE 12 


HEADER CONTENTS OF ERROR SECTOR = XXXX XXXX XXXX XXXX 
rie Line GIVES THE CONTENTS OF THE HEADER OF THE SECTOR WHICH 


LINE 13 


RMEC1 = XXXX RMEC2 = YYYY 


THIS LINE WILL BE PRINTED AFTER A SUCESSFUL RETRY OF A SECTOR 
WHICH BECAME ECC CORRECTABLE DURING RETRY. 


LINE 14 


ECC CORRECTABLE WITHOUT OFFSET 
THE SECTOR IN ERROR IS ECC CORRECTABLE; NO RETRY ATTEMPTS ARE 
NECESSARY . 


LINE 1S 


READ CORRECTLY AT (NEG OR POS) OFFSET 
Ere 26° TOR IN ERROR WAS READ WITHOUT ERROR AT THE INDICATED 


ECC CORRECTABLE AT (NEG OR POS) OFFSET 


att iy 


et 
a4 
BS 
ree 
Rs 
is 


ine 


14 
1474 
1475 
1476 
1477 
14 

14 


TEE 


dana 


cf 


Se RR RS Lae B ae GRAD ERP RSS GRA SERS 


pe b= bs bs eo 
Mtwrue-O 


WMUIUTUTUNU 


11 
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Re crn IN ERROR BECAME ECC CORRECTABLE AT THE INDICATED 


LINE 17 





CORRECTED ON X RETRY 
ie OPERATION WAS PERFORMED ERROR FREE ON THE INDICATED RETRY 


UNCORRECTABLE AFTER X RETRIES 


THE OPERATION COULD NOT BE PERFORMED CORRECTLY AFTER THE 
INDICATED NUMBER OF RETRY ATTEMPTS. 


LINE 19 


DIFFERENT ERROR DURING RETRY 
ING THE ERROR 


WHILE THE PROGRAM WAS RETRY DIFFERENT OCCURRED. 
ia THIS Lie IS PRINTED, THE RH11/RMO3 REGISTERS WILL ALSO BE 


PRINTED (SEE LINE 2). 


DATA COMPARISON ERRORS 
A PRINTOUT OF THE DATA COMPARISON ERRORS FOLLOW THIS LINE. 
LINE 21 


TOTAL COMPARE ERRORS = XXXX 


THIS LINE GIVES THE TOTAL DATA COMPARISON ERROR COUNT. THE 
VALUE GIVEN IS IN DECIMAL. 


LINE 22 


THE DATA COMPARED OK 


THIS LINE INDICATES THE RESULTS OF THE DATA COMPARISON FOLLOWING 
ECC CORRECTION. 


LINE 23 


ECC CORRECTION RESULTS 


bo bo bh be be bn Pe ee 
le en 
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ytststitt 
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THE PROGRAM PERFORMED ECC CORRECTION AND THE RESULTS ARE REPORTED 
BEFORE CORRECTION AND THE HORDCS) APTER COR OB BRE CIYEN,- THE. HORD(S) 


LINE 24 


ERROR BURST BEGINS AT WORD XXX IN DATA FIELD OF ERROR SECTOR 
THIS IS AN INFORMATIONAL LINE a WiLL BE PRINTED FOR ’*DCK’ ERRORS 


Het Sa Tne a rt Ue Mok eee a 


ERROR WAS NOT IN THE DATA READ - 
ECC CORRECTION CAN’T BE PERFORMED 


THE DATA ERROR WAS NOT IN DATA TRANSFERED TO MEMORY. 
LINE cb 


CONTENTS OF THE ERROR SECTOR (REPORTED ABOVE) 

IF SW ) THE SECTOR TC GAVE OR, 
Fron Of ero" Data CHECK ERROR 15 PRINTED: THe 

CONTENTS OF THE SECTOR FOLLOW THIS LIN 

LINE 27 


ORDERS: Wh ERRORS: X WRDS XFR: YYYY WRODS READ: 2222 
THIS IS THE LAST LINE PRINTED FOR ALL NON-POSITIONING 

TYPE ERRORS. 

"ORDERS’ IS THE TOTAL NUMBER OF COMMANDS GIVEN TO THE DRIVE 
WHICH REPORTED THE ERROR. 


IS THE TOTAL ERROR COUNT FOR THE DRIVE AND INCLUDES 
EVERY DETECTED, REGARDLESS OF TYPE. 


*WROS XFR’ IS THE torre NUMBER OF WORDS WRITTEN AND READ BY 
THE DRIVE. 


*WRDS READ’ IS THE TOTAL NUMBER OF WORD READ BY THE DRIVE. 


ORDERS: Willd TOTAL SEEKS: XXX TOTAL POS ERR = YYY TOTAL SKI ERR = Z 
THIS IS THE LAST LINE PRINTED FOR ALL POSITIONING TYPE ERRORS. 


3 
8 
3 
5 


2 
F 
x 
& 
2 


8 
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"ORDERS’ IS THE TOTAL NUMBER OF ORDERS GIVEN TO THE DRIVE WHICH 
REPORTED THE ERROR. 


*TOTAL SEEKS’ IS THE TOTAL NUMBER OF SEEK OPERATIONS PERFORMED 
BY THE DRIVE. 


*TOTAL SKI ERR’ IS THE TOTAL NUMBER OF ’SKI’ ERRORS 
SIGNALED BY THE DRIVE. 


° 


Bs bs Bs be eb nn Bae he Be pe ee pee ; 


SRR REDRES SEIRRLR TS SESE EOS 
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COCO SK Koo 
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8. PROGRAM DESCRIPTION 


8.1 PROGRAM OPERATION 


— 


WHEN THE PROGRAM IS STARTED, PROVIDING APT 
Preece LOADED OTHER THAN FFT APT SCRIPT MODE, ALL aipees AND 
UNDER Ton Ft E CONT RAL CE p FoR Perret AND 

CRIERRUPT Cima jg HRIeT LE TE OR KaLTeP’ CLOCK S ST . 


"PROGR INTER. Le COMBLETE” “ConA ENTRIES MILL. NOM BE” RCEPTED 


THE PROGRAM SCANS ITS INTERNAL ASSIGNMENT TABLES, LOOKING FOR: 
3} pal TO gg a STs 
5) Daves REQUIRING, comer OTN TIATION, BUFFER ASSIGNEMENT, 
4) DRIVES COMPLETING CURRENT OPERATIONS. 
THE PROGRAM CONTINUES SCANNING ITS TABLES UNTIL AN ENTRY I 


FOUND. 
IN THE CASE OF PROGRAM AT INITIAL START, THE AL ENTRY WILL 
BE MADE BY THE hg ot 


WHEN A ee IS ENTRY ROUTINE VERIFIES THAT THE 

a IB PRESENT, Te AND IS ONLINE. THE ASSIGNMENT ROUTINE 
hgh 1 TRSTRUCTION, SETS ’FMT2e’, SSUE 

AT RECAL TBRATE” 


AND 
PARAMETERS FOR SELECTED AND A BUFFER IS ASSIGNED. IF 
THE ION Is A inTe TH a SRE CK ORDER, THE ASSIGNED BUFFER 

(WRITE CHECK ORDERS ARE 


WIL Be ETE AT FI iS Fhe pay CHECK ORDER Use oc 
ea PRECEEDING WRITE ORDER. 
at 


iy | COMMAND INITIATION ete D NE Et 
PAN TO_ ANOTHER 1 ieee TO 


TION I 
TO IVE WITH A tamer ere S 8 SECTORS EARLIER 
THAN , , cECTOR en NITIATE 
igs ee 


tH 


: 


DRIVES, ARE SEARCHING F' 
THE PROGRAM 


IMPLI 
FINOS *T THE PROGRAR READS 
THE LOOK REGIS “( DRIVE AND 
COMPARES THE POSITION OF DISK ul he Pome DESIRED SECTOR. 
IF OTHER DRIVES ARE WAITING ON CYLINDER, ARE ALSO CHECKED. THE 


SSUES THE REQUESTED ORDER TO DRIVE NEAREST ITS 
SECT THE DRIVES NO CTED WILL ANOTHER SEARCH 


PRE R OS RNS Pes 
2 
- 
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1637 NOT BEEN ON CYLINDER AS LONG. 

1640 Ane STORED AND TP DATA TRERGEER TS INITIATED FOR A a BaLYING E oAIVE 

ies 

is es fee 





1645 TWO REGISTERS 
ea? bara Core a Mis SEGLENCE 15 COMPLE THE ORIVE 
1648 IS D {0 et mathe THEN 

1649 INITIA DATA WaT ING DRIVE RESELECTS AND 

1650 AT TBTES ANOTHER TION ON THE RELEASED DRIVE. 


o 
uw 
—s 


ERRORS WHICH OCCUR ARE PROCESSED IN THE FOLLOWING ORDER. MULTIPLE 
ERRORS WILL BE REPORTED AS THE FIRST ERROR TYPE CHECKED. 


A. ERRORS REPORTED FOR OPERATIONS WHICH HAVE NOT COMPLETED NORMALLY. 
PERSISTENT UNSAFE CONDITION - EM12 
ATAL Rese Prca Emre | EMO 
OPERATION NO WITHIN TIME LIMIT - EM13 
UNIT WENT OFFLINE - EML4 
B. ERRORS REPORTED FOR OPERATIONS WHICH COMPLETE NORMALLY. 


SOR GR RoE SOM aRM OLN 


N“ 


ae 
5 
= 
ts 
2 


deme oe Pe be pe be be 

COLKKKao 
52 
= 





‘ine’ Bot - 
MISCELLANEOUS DRIVE ERROR - EM30 
ERRORS NOT FLAGGED BY THE HARDWARE ERROR DETECTION LOGIC. 
SA eg Ee a a 

A COMPARE ERRORS - NO DRIVE ERROR DETECTED - EM42 
Coty MATCH DATA WITH A PATTERN - EMY3 
BIT(S) SET T NO ERROR SIGNALED BY THE RH11 - EM44 


ERROR 
ECC LOGIC FAILURE - EMYS 
BUS ADDRESS OR COUNT NOT CONSISTENT - EMY6 


SEeRR PRO ose 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ooo 
wes 


8.2 DUAL PORT OPERATION 
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Selene 


NNNSNNNNNNS 
WONWUIC WO 


bs b= be Fb hs Be + Pb = be ee be be 


SAFES ASRBNRATORE BIO VON TONES 


DUAL PORT wis? IS NEARLY IDENTICAL TO THE OPERATION DESCRIBED 
IN SECTION 8.1. THE DIFFERENCES ARE IN COMMAND SEQUENCE INITIATION 
AND ORDER TERMINATION. 


THE DUAL PORT HANDLER ROUTINE IN Proce RECEIVES 
ARE Oh aTEcaae He He an ee 
oa ee ne WHE OTHER PORT, READING. Tea 
18°BV AVAI Papgren Gecks OVE 7 ne corte Seen, 
i Be aay are (set enTaY Pon 8,1 ABOVE) ‘ 


th a Al E oe DRIVE HAS 

NOT ai TE ORE THIN THE TYE INTERVAL 
T BOT te bun "PORT cs NORPALLY 

tote IN THE RIV AIN CONDITIONS 





apie Ti te etees Maree 
WHAT 0 cee overene! 


AFTER A DRIVE HAS Coere TED AN OPERATION, THE PROGRAM WILL STORE 
THE REGISTERS AND I * TO THE DRIVE: IF THE OPERATION 
TERMINATED ware AN 
ERROR PROCESSING 


BR gga SED OPPOSITE PORT ARE STILL 
i IN THAT A RELEACE COMMAND IS ISSUED 
FE oe eT Oe foe to faetoee 
DER These CONDITIONS HAS NO FUNCTIONAL 
s PELE ON THE ATION OF ORIVE. 


SELECTION OF OPERATION VARIABLES 


A. SECTOR ADDRESS SELECTION IS RANDOM BETWEEN THE VALUES IN 
*MAXSEC’. TRACK ADDRESS SELECTION 
THE VALUES IN ’MINTRK’ AND *MAXTRK’. C 


ING ca RESS, THE 
THE aretha FOR EX EXAHPLES TF RINTRR’ 1S BAND HAXTRI’ IS 
S 2, THEN TRACK Sy SELECTION WILL EXGLIDE TRACKS 3 — 4 
ROR THE: SELECTION AMD SELE ADDRESS FROM AMONG ADDRESSES 
s 


ulin 


SIZE IS_RANDOM SELECTED EN 4 THE 

SIZE’. THE SIZE SELECTED IS WEIGHTED TO ENSURE 
NECESSARY AS THE PROGRAM REQUIRES 

A PORTION OF THE SECTOR TO BE ABLE TO MATCH THE DATA 


a8 
: 


r 
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TO A PATTERN FOR DATA COMPARISON PURPOSES. 


C. Te WRITTEN IS og a il Nill THE 15 ao 
D. ann ey artis 


OnTA Ore PRE RASHE TER 
read 8 Fae, (880 

A i a: aTh oe 

258 ( PROGRAM WILL MOT FORMAT 


WRITE iyi 
TH TOR ROE DMMEND Te NOT RANDOMLY. SELECTED. THE PARAMETERS 


FoR he THE thee. OPERATION ARE THE MINIMUM OR STARTING VALUES OF 


" 


8.4 DATA PATTERNS 





SERRE LIGURIAN See & 


AIS READ FROM 
Py ae Dah ens Wak ee Pee 
par 1 PAT 2 PAT 3. pat 6 PAT 7 PAT 
000001 1777 000000 Hess Geese 066666 
177770 ieee jeeeey DEEEEE 
000017 177760 1 122Pey 1 1365 lerees4 
000037 Lhe. 177777 1 151 
44 i 177777 1 $1322 Becbee 
Balt Ire Be te 
ie tas lee feed ies fee 
ae ins ca ies eee 
sires IBS Mos fn ies fee 
ee fen fees Set 
100000 1S5554 066666 
1 000000 1 155554 151322 066666 
PAT 9 PAT 10 PAT 11 PAT le PAT 13 PAT 14 PAT Is 
000001 177776 172666 077777 153333 000000 177777 
000002 177775 155555 137777 066667 177777 000000 
000004 177773 172666 157777 153333 177777 000000 
000010 177767 155555 167777 066667 177777 000000 


LOS 
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Pil 


SE@ 0036 


Geseeeeescs 
SESSREEESSSS 


ies 
SESE 


dt dd md mt tt 


Cee 


Og md oa ed) eed eg ed 4 ed et 


SSeES ESSN 


Ba ed ee ed eg ed gd 


cesbeoleoeee 
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RH70(11)/RMO3 DRIVER 





THIS DOCUMENT IS THE USER’S GUIDE FOR THE RH70/RMO3 DRIVER. 
TO INITIALIZE THE DRIVER: 

JSR PC, RMINIT 

RETURN 


re Sa Ms ed EXAMINE THE “DRVSTA” TABLE TO fe 
DR le Te ONLINE FOR TESTING. THE "DRVSTA’ TABLE IS 


PER DRIVE. THE STATE OF EACH DRIVE WILL 
Ge “Inofcareh Ren aS FOLLOWS: 4 


DRVSTA DRIVE STATE 
0 ONL INE 
=0 OFFLINE DRIVE 
IS NOT AN RMOS, OR 
se NONEXISTENT ORIVE 
THE DRIVE TYPE IS DEFI aH 8 BYTE L a TAGGED ’DRVTYP’. 
ll INs On BND IS INDEXED BY THE 
RI as 
CONDITION 
: NONEXISTENT DRIVE 
-1 NOT AN RMO3 


THE ’RMINIT’ ROUTINE WILL DO A READIN PRESET AND WILL SET FMT2e. 


AFTER THE DRIVER HAS BEEN INITIALIZED, IT IS CALLED USING THE 
FOLLOWING SEQUENCE. 


CALL: 


JSR RO, RMO3 ;MAKE THE CALL 
PNTDPB ADDRESS OF OPBx 
RETURN RETURN IF QUEUE IS FULL 
RETURN2 ;RETURN IF REQUEST IS IN 
; QUEUE OR T TS AN 
; CONDITION 
*#DPB (DATA PARAMETEF: SLOCK) 
PNTOPB: .BYTE 0 ;(0) ORIVE NUMBER 
-BYTE Q 3(1) OFFSET VALUE OP FMT22, ECT, AND HCI 
-BYTE 0 ;(2) COMMAND 
-BYTE QO ;(3) PSEL AND Al7 AND ALG 
-WORD O 3(4) WORD COUNT (MUST BE NEG.) 





? 
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Soman Pit” “CPO Ses 
if wor fEL NETL HSI Ea 
. ;(10) SECTOR ADORESS OR _ 
iB ‘me HR ac is 
of US) Ba Ya 
ie Fiddle’ ve VER 


SeRReoe eS 
=" 


i 
;B fines od OCCURRED 
is copulate oa 
9.4 THE DRIVER PROVIDES A SOFTWARE TIMEOUT tg 
IS ATTaEE BASLE TA he Pe Pt TIME ROUTINE 
MOV #16. ,-(SP) OP OOK MILLISECONDS BETWEEN 
JSR PC, RMTMR re TIMER ROUTINE 
IT SHOULD BE NOTED THAT i IE a TO ORIVE THE 


YOU 
CLOCK. AND THE ai 3 I 
THE DRIVER WILL TI 1 SECOND FOR ALL POSITIONING 

DATA_ TRANSFER fe Mitte SET THE TIMOUT TO 30 


AND 
SECONDS FOR ERROR RE’ OPERATIONS. 





8:28 





“3s 
- 


9.4.1 EXAMPLE - WRITE 1000. WORDS 


1S: JSR RO, RMO3 CALL THE DRIVER 
WRTDPB ‘DPB ADDRESS 
BR 1s ‘WAIT FOR 
2S: Ist TOPB+16 ‘WAIT FOF ie Fb UE SMPLETE 
’ BMI ERROR1  sERROR OCCURRED 
WRTDPB: . y 5 ; ;DRIVE #5 
“BYTE Je ‘WRITE COMMAND 
-1000. : 
WORD WRTBUF ‘BUFFER ADDRESS 
BYTE 3 : SECTOR 
BYTE 5 : 


fe BS pa Be a bm em sh eb oh eee ee b= bb pe Be pe Pe bh Rn be a 


SRT E eRe Srincun Smtr eco sesame 


if 
; 


ACHIEVED 
COMMAND TYPE 
N 
N 
Pp 
Pp 
N 
N 
Pp 


I 
INDEX 


Ne OAR NUM Mas Ss 


— 
101 
103 
105 
107 
M1 
113 
115 


pSTATUS/ERROR INDICATOR 
Soa 

NG 
;INA 


BO4 
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NO OPERATION 
OAD 


RECAL IRATE 
DRIVE CLEAR 
RELEASE 
OFFSET 


MNEMONTC 


oe 
“ORD 400, ERRTBS, 0 


-WORD O 
WRTDPB: 
RH70/RMO3 REGISTERS 


CREST EPEREESP SEE EPEY 


COMMANDS PERFORMED BY THE DRIVER 
COMMAND 


9.5 
9.6 


ec ee eee eee a PERU T A RITSIEISRS SSS TOSS TIRES 


dd a hd et ed dd eH tt 


3 
; 
as 


ms 


LL TT & 


SSSBSSsIsss 
Pa pee ee 
WONOU CWO 


ia 


A 
i 


Sai ann PS BS SRN 


x 
8 


: 
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9.7 


RETURN TO CENTER 
READIN PRESET 

PACK ACKNOWLEDGE 
SEARCH 

GET REGISTER(S) 
SET FORMAT 

SELECT DRIVE 

WRITE CHECK DATA 
we 
WRITE DATA 

WRITE HEADER & DATA 
READ DATA 

READ HEADER & DATA 


Post ONING. 


N 
Pp 
i) 
S 


OPB STATUS/ERROR INDICATOR WORD 


THIS INDICATOR WILL INFORM THE USER OF RESULTS OF THE REQUEST. 
THs 13 AECOMPL TSHED BY SETTING VARIES Bits OF THE INDICATOR TO 
BIT NO. MEANING IF ON A “1” 
1S 


117 
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DATA 
SPECIAL IDED BY THE DRIVER 


14(1) USER A FOR A 
PERFORMED ON INE OR 


o Oo wwnwnwvwv2zt2z BD 


o °o 79 9 


ERROR OCCURRED 
Bone (BiOr=1)! B1TS de-0a SPECIFIES TPE 


UNSAFE DRIVE 


I Se UST Ro 
RBS ue det 

1e(2) PERSISTENT UNSAFE CONDITION EXIST. 

11(2) UNCORRECTABLE PARITY ERROR OCCURRED 


SEQ 0040 


00 rs Se a tia EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 42 


9.8 


10(2)¢4) 


9(3)(4) 
8(4) 

7 

6(2) 
5(2) 


4(2) 
3(2) 


(3) => 


(4) => 


FATAL PAR PARITY ERROR. A MASSBUS CLEAR 

ALL PLL’ onvact’S ST Tae DLE STATE” ao 
SOFTWARE TIMEOUT OCCURRED ON THIS DRIVE 
SOFTWARE TIMEOUT OCCURRED ON ANOTHER DRIVE 
DONE 

ERROR OCCURRED OURING AN 1/0 OPERATION 


Enns ue DURING AN OPERATION 


CORRECTABLE UNSAFE CONDITION OCCURRED 


DRIVE ERROR OCCURRED THAT CAUSED AN 
AUTOMATIC “RECALIBRATE™ SEQUENCE 


PORT REQUEST TIMEOUT. ne DRIVER REQUESTED 
THE Te DRIVE bat A gD bp NOT 
WITHIN 


NON-EXISTENT DRIVE REQUESTED. USER MADE 
A REQUEST FOR A NON-EXISTENT DRIVE. 


REGISTERS TERE NOT SAVED) 


OLE irae 
14 etd CEPORE THe “DRIVE CLEAR” CLEAR”. 
aes QUEUE y BEEN op. 
RUPUPRMO? REGISTERS FOR ‘ei 
SAVED RS PER DPBS 14 BEFORE THE INIT. 
A “RECALIBRATE™ SHOULD BE ISSUED 
BEF ORE ANY OTHER COMMAND. 


ERROR CALLS MADE BY THE DRIVER. 
THERE ARE A FEW ERRORS THAT CAN OCCUR THAT CAN NOT BE INDICATED IN A DPB. 
WHEN THIS we Fee IS DETECTED BY THE DRIVER IT WILL MAKE 
ot ERRON CA OF “ERROR WHERE “N” IS THE ERROR 
R AND THe ERROR WILL BE AN EMT’ INSTRUCTION. 


N TYPE 





SEQ 0041 


E04 


SE@ O042 
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eet. 

it dit at 
y E sebEppep ag 24g bE : 
~ £ sOgUREEE os Sie _ : 
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-Pll = 27-JUL-77 08:04 
133 .TITLE MO-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER 
1 : GHT (C) 1976 
131 -#DIGITAL EQUIPMENT CORP. 
i * » MASS. 01754 
: j PROGRAM BY C. CHEN 
1 :*THIS PROGRAM MBLED USING THE PDP-11 MAINDEC SYSMAC 
Ei HEPRCKAGE ORAINGER-11 DoGRELC) GAN 19, 1977. 
139 -SBTTL OPERATIONAL SWITCH SETTINGS 
iy +i SWITCH USE 
14 1 Seeean -------------------- 
143 i 1S HALT ON ERROR 
144 te 13 INHIBIT TYPEOUTS 
ue : ig NE; DATA COMPARE ERRORS 
iW? i : bon T_ CoE PARAPE TERS (LOOR ON PRESENT VALUES) 
193 ii ‘ B. fo ° Exe comet TON Fe LTS BrSPrAvED IF ERROR 
oe . a 7 
i Ra G: D3 16r Brae okive ten noes, 0 OF TEST REACHED, 
123 + B. Bfeptay eee toR TF *DCK’ UNCORRECTABLE AFTER 
154 «i geTH RETRY 
155 i C. IF DATA ERROR & SW7 SET, DISPLAY 
187 ii 2 8. 1 TATUS WHEN PROGRAM STARTED 
159 * 1 INHIBIT DATA COMPARSION AFTER READ ORDERS 
160 1 0 READ ONLY MODE 
16h *SBTTL BASIC DEFINITIONS 
163 -#INITIAL ADDRESS OF THE STACK POINTER ### 1100 #%# 
164 001100 STACK= 1100 
165 “EQUIV ENT ERROR ;;BASIC DEFINITION OF ERROR CALL 
166 “EQUIV IOT} :BASIC DEFINITION OF SCOPE CALL 
169 000011 jIMTSCELLANEOUS DEFINITIONS Oe FoR HORIZONTAL TAB 
ta 000012 LF= 12 + RODE OR Hone FEED 
171 000015 CR= is :CODE FOR CARRIAGE RETURN 
172 000200 CRLF= 200 ::CODE FOR CARRIAGE RETURN-LINE FEED 
173 177776 PS= 177776 ::PROCESSOR STATUS WORD 
174 .EQUIV PS.PSW 
175 177774 STKLMT= 177774 ;;STACK LIMIT REGISTER 
HES Big: Heep ee Su nemo” OUST 
178 177570 DDISP= 177570 + RROUARE DI REGISTER 
180 = #GENERAL PURPOSE REGISTER NITIONS 
181 000000 RO= “0 33 REGISTER 
182 000001 Riz %\ *:GENERAL REGISTER 
183 oo0002 Re= %2 *:GENERAL REGISTER 


rururururorururururorururororururorufurnofororurenofopofororororororurururofururururororurururufu frurororuru fruroru 


OnUMTNwN 


Seeemnn 


aaa 


4 4 0 4 0-0 4 0 


EREEREEE 
ome me on 
ome eme on 
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DEFINITIONS (BITOO TO BIT1S) 


REGISTER” SWITCH DEFINITIONS 


BaGGRAaGAA 
ZVRNe zoo EASE AE See eeiS as... MM rErrece Seeteeatee 


Begs s es eae eee errr ccc cece Seeeeeeeee 


EXERCISER MACY11 30 
BASIC DEFINITIONS 


eee 


San Mae aee MUNA UUM UREA AU MUA TAMARA 
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BI 100 
BITOS= 40 

BIT 20 

BIT 10 

BITOe= 4 

BITOl= 2 

BITOO= : 

.EQUIV 8ITO9,BIT9 
-EQUIV BITOS,BITS 
aia 
: oT V BITOS, ie 
“EQUIV BITOY,BITY 
.EQUIV BITO3,B1T3 
“EQUIV BIT 8 T2 
“EQUIV *BITI 
“EQUIV BITOO;}BITO 


;*#BASIC “CPU” TRAP VECTOR ADDRESSES 


peeve 1 RESERVED AND TLLEGAL INSTRUCTIONS 


0 
TBITVEC=14 Fea 
BETVER= 14 + , Thee TRAP (BPT) 

= 

a Eee be bP output TRAP (IOT) ##SCOPEx# 
PURVEC= 24 $ rOuER FAIL 
ENT VEC: j 5 EMULATOR TRAP (EMT) *#ERROR#* 
TKVEC= 60 ‘TTY KEYBOARD VECTOR 
TPVEC= 64 itrty PRINTER VECTOR 
PIRQVEC=240 soa PROGRAM INTERRUPT REQUEST VECTOR 

AVECT1=254 


5p RRRRRERERER EERE ELE L EAE EE EEA REEL EERE LER ARERR ERE R LEE EE EES 


-SBTTL RMO3 REGISTERS 


5p ME AE A EAE SE AE A AE SE SE SE SE ES HH EA EEE EE EERE ES 


;CONTROL AND STATUS REGISTER 1 (RMCS1) 


IE= 100 s INTERRUPT ENABLE (BIT #6) 
RDY= 200 ‘READY (BIT 87) 

ais: tbo TET ORDER BUS ADDRESS BIT (BIT #9 
PSEL= 100 BOT SEER vee #10) 

MCPE= 20000 ;MASSBUSS PARITY ERROR (BIT #13) 
TRE= 40000 : TRANSFER ERROR (BIT #14) 

;SC= 100000 ‘SPECIAL CONDITION (BIT #15) 

WORD COUNT REGISTER (RMWC) 

‘(EACH BIT IS CALLED BY BIT NUMBER) 

;BUS ADDRESS REGISTER (RMBA) 

‘(EACH BIT IS CALLED BY BIT NUMBER) 


SEQ 004S 


I04 


SE@ 0046 


NCREMENT INHIBIT (BIT #3) 


= aA) 
z= =u 
--—- so4SeT 
Lan Lean =U 
- om fF fs 
Ll ee oe) oe oe) 
a Omar 
~ _ —~Ow~es 
“ao as Se — ow 
gave, 2° “a 
00g 4 Soceee.s 
4 
eRe bem ore = 
oe —co — 
anmz > —~a~ ~ 
ere — L md 
= 


wg % aia 
cee ite 
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ae 2e98esteeeee 
whe sehs She nB Sit 


oa AND STATUS REGISTER 2 (RMCS2) 
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RMO3 REGISTERS 


ae 


: CLGERRSRAES 


“—UmOTiNoroc 
ne at dt wh wt tt 


ST NTST NIST NENT] 


(#00) 


5p RRRRRRRERER ERLE EEE LEE RELA EERE EEE REEL EERE RARER REE RE REEL EEE 


-SBTTL RMO3 REGISTERS 


5p MERE SE RE SEA AE SE AE SESE ME 0 SEE SEE HE HH EEE EERE 


;CONTROL AND STATUS 1 REGISTER. 


cases 


Sciin S SiN RR a SiS Cay 


;ORIVE STATUS REGISTER (RMDS1) (#01) 


V_- 
™ 
al 
Boa 
— 
— 
@ 
a 
~ w 
ao w 
a 
4 
= : 
4 
@ _ 
~ aw 
-—Zr- 
ram 
~~ = P= 4 
-~ 
w s See 
-_~ se et Ow~ 
- soqc~ 
a at ad 
— 
at a - 
— — 
aa Bs Me > 
ory 


Pee oe 





;ERROR REGISTER #01 (RMER1) (#02) 


JO4 
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; ILLEGAL FUNCTION (BIT #0) 


AAARSRBUTESEA Miso crt > 





1 
PAR= 10 : (BIT #3) 
FER= 20 : FORMAT ERROR 8 T #4) 
WeF= 40 ‘WRITE CLOCK FAIL (BIT 85) 
ECH= 100 “ECC HARD ERROR (BIT 86 
HCE= 500 : (BIT 87) 
toes tooo : ERROR a talT #9) 
We: — $bo0 ait oe (or a 
DTE= tpo00 OR ath ERROR (BIT #12) 

2 e000 TION (BIT #13) 

100000 


: 
: DRIVE (BIT #14) 
100000 DOCK»: *DATA CHECK ERaon (BIT 15) 
;MAINTAINABILITY REGISTER (RMMR1) (#03) 


;ATTENTION SUMMARY PSEUDO-REGISTER (RMAS) (#04) 


000001 ATO= 1 ;DEVICE O (BIT #0) 
000002 ats § sei 1 an tb 
o00010 AT3= 10 i Device § (Bit 5} 
BDDTD ates sevice o (Bt ad) 

ate: op iBeVIGe & (BIT He) 


;DESIRED SECTOR/TRACK ADDRESS REGISTER (RMDA) (80S) 


;DRIVE TYPE REGISTER (RMOT) (#06) 


00000 DT00= :DR Tl 

pocbOe OTO1= A ‘RIVE Wer NUMBER Bt 2 

eens Brose 10 i DRE Neer BER BT a 

Goong Brose | 40 Delve NOreER BIT & 

000200 Brats | 200 Delve NREER BIT @ 

000400 OTO08= 400 i DRIVE TYPE NUMBER Bt g 

004000 ORQ= 4000 ;ORIVE REQUEST REQUIRED (BIT #11) 

020000 MOH= 20000 “MOVING HEAD (81 #13) 

040000 TAP= 40000 ‘TAPE ORIVE (BIT #14) 

100000 NSA= 100000 NOT SECTOR ADDRESSED (BIT #15) 
;LOOK-AHEAD REGISTER (RMLA) (#07) 

000100 SCl= 100 sSECTOR COUNT FIELD O (BIT #6) 

000200 SC2= tSECTOR COUNT FIELD 1 (BIT #7) 

000400 - ‘SECTOR COUNT FIELO 2 (BIT #8) 

001000 SCi0= 1000 ‘SECTOR COUNT FIELD 3 (BIT #9) 


oe oo oe oe 


ee 
NOW LWT O 


~Som 


ERESSOUROORPOSS SER TRRE Raw ARO SERS RR ARO NNRS 
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002000 Sc20= 2000 sSECTOR COUNT FIELD 4 (BIT #10) 


GISTER (RMOF) (#11) 
OFFDIR= 1 ;RMOZ_ OFFSET DIRECTION. ait este 
Ss . 
Bete p08 +E CTION aig INiBrt (BIT #11) 
FMT16= 10000 :FORMAT BIT (BIT #12 





Eee TT Ts CALLED GY BIT MUMGER) 


;CURRENT CYLINDER ADDRESS (RMCC) (#13) 
; (REGISTER CURRENTLY NOT USED) 


;RMO3 ERROR REGISTER #02 (RMER2) (#15) 


000010 = 10 

000200 OvC= 200 

002000 = 2000 

ae ee 

at : 

040000 SkKI= 40000 ;SEEK INCOMPLETE (BIT #14) 


teal 


ION REGISTER (RMEC1) (#16 

BY BIT NUMBER) 
;ECC PATTERN REGISTER (RMEC2) (#17) 
; (EACH BIT IS CALLED BY BIT NUMBER) 
5 ES A a 
-SBTTL RMO3 DRIVER COMMANDS 


5p MERE EAE ME AE AE SE HE SE HEE HE ee HE EEE EERE EES 


000101 RNOP = 101 ;NO_ OPERATION 
000105 SEEK = 105 ; 
000107 RECAL = 107 ; RECAL IBRATE 
00011 DRVCLR = 111 ;DRIVE CLEAR 
00011 RELSE = 113 ; RELEASE 
00011 OFFSET = 115 ; OFFSET 
000117 RTC = 117 ;RETURN TO CENTER LINE 
ois! READIN = lel ;READ IN PRESET 
1 AK = 123 ; PACK 
poet at SEARCH = 131 5 ReOred 
141 GETREG = 141 ; REGIS 
000143 SETFMT = 143 ;SET FORMAT (& ECI OR HCI) 
000145 SELDRV = 145 ; SELECT DRIVE 
oles WCKD = = 151 prt 3 CK DATA 
0001 WCKHD = 153 ;WRITE CHECK HEADER & DATA 
000161 WRTDAT = 161 ;WRITE DATA 


Baraat? 


Ht 4 


af 


BUPBUER  Saee RERR SR SBURRER RES 


ur 
Wwe O 


BRODER 
SSSSss8 
DORERBS 


en ee oe 


MACY11 30(1046) 27-JUL-77 08:07 PAGE SO 

." SEQ 0049 
RTH = 183 sWRITE HEADER & DATA 
ROHD = {54 iREAD PPABER & DATA 


.SBTTL TRAP CATCHER 


x, uNiseD LocaTrons BERN Foe ho TS 
tECOCATION 0 0 OCONTRINS O10 0 TO CATCH IMPROPERLY LOADED VECTORS 


=174 
DISPREG: “WD ;; SOFTWARE DISPLAY REGISTER 
;; SOFTWARE SWITCH REGISTER 


‘ert wri, seonaess es ; JUMP TO ey ING ADDRESS OF PROGRAM 


asSTART t AHANGE THE RH11 UNIBUS ADDRESS 
‘AFTER INITIAL START 


-SBTTL ACTI1 HOOKS 


SEGARA GEARS AREER AAA ARLES RARER RA LALA LAA RAS AA AAA HRE 
‘HOOKS REO REQUIRED BY ACTI1 


SSyPC=. SAVE PC 
SENOAO ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
‘WORD 40000 ;;2)SET LOC.S2 TO 40000 

em 3; RESTORE PC 


.SBTTL APT PARAMETER BLOCK “ 
JHE EEE EEE tt 


H REKRERSRGELRE RRA RRRREREEE 
tag LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
RELEHE ee eee satan re 


tf 34 ree oe TO POINT TO START OF PROGRAM 


UP 
tT POINT 10 A TO APT INDIRECT ADDRESS PNTR. 
Shen ;3POINT TO prion con OCK 


Sresaiasasaees 6-9-9 96 3 9 6 98 9 9 EE EE 
falda Coen eer BLOCK AS DEFINED IN THE APT-POP11 DIAGNOSTIC 


SAPTHD: 
SHIBTS: . ;;TWO HIGH BIT 0 18 BIT MAILBOX ADDR. 
SHOROR: “WORD SAIL + oF MAILBOX (BITS 0-15) 
STSTN: 180. 


- WORD 
SPASTM: .WORD 7 RUN TIME IN et OF 1ST PASS ON | UNIT (QUICK VERIFY) 
SUNITM: .WORD 180. :ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
Ay SETEND-SMAIL/2 ;;LENGTH MAILBOX-ETABLE (WORDS ) 


MO4 
MD-11-DZRMB AQ/O0, RMO PERFORMANCE EXERCISER MACYI1 30(1046) 27-JUL-77 08:07 PAGE SI 
04 COMMON TAGS 


DZRMBA.P11  27-JUL-77 08 





+ - + 
te Bee be at ee Bee BD 


+ + + 7 + > 
bb be 0 eb fo fs ee 


Roos 





re 


0 0 0 0 0 0 0 0 0 0 0 0 = 0 0 
P= be 6 FB 


SN SFERSKLH-EFESSRERHSREVS 


000377 





qRecRapenie 


ENE R ROR O ae eae ae COUR ERE RENO RNR 








-SBTTL COMMON TAGS 


KEEEKELBSERLL EEL ERR ESS EKKRELES EL RARAREL ERLE HRS KE 
‘kTurs TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
IN THE PROGRAM. 


. 
me Be Be 


: 
x 


gages suaessssssStSSSESS 2 


3333 


= 


RELLLLLLLLLLELE 


;;START OF COMMON TAGS 


5 js CONTAINS THE 
bres ais aie ON COUNT 
i conrad a RponeSS 
iGauatte Sete Sate Gene 
: ieee be ian Be 
° 2 nike fiotest FRROR, I TRUCTION 
i Hea ROORESS OF rae ‘DATA 
0 ::CONTAI 
0 ::CONTAI ty onTAY 
: : :RESERVED--NOT TO BE USED 
: + HiME NODE INDICATOR 
BSR OF SWITCH REGISTER. 
ODISP 0 OF Or PLAY 
ih PR aR ET G. ADDRESS 

titty PRINTER BUFFER fee: ADORESS 
0 : CONTA woe Fictek So FOR reels 
2 une ONTBINS OF ry TERS REQUIRED 
b HH nat bows. FERce (BET 7) SBEYES) 
Saree Hobe FoR 
/7/ : ION 


«15> 


> 
eee 2; RL, SR |. |, AEB es er saceeniae" 
‘ASTTL APT MAILBOX-ETABLE 


: 1 |” ape i lament i NAAN IE EM 


Bss8888 


ANSGTY 3; 
AFATAL 3; 
ATESTIN 3; 
PASS 


AURIT 
AMSGAD 
AMSGLG 


; MES LENGTH 
;;APT ENVIRONMENT TABLE 











NOY 
MD-11-DZRM@ AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE S2 SEQ 0051 
OZRMBA.P11  27-JUL-77 08:04 APT MAILBOX-ETABLE 


3 we oe Sot ena 


bi Se Titepu TYPE 
i * begun? eet , 11720=03, 11/40=04, 11745=05 





a 


ae 
5533 


iH oo a cen 
on12 Bue Pe 
-- (HIGH BYTE) 


eit. 


oF 
aa 






Be =a 








— * oe ee ee oe ht THIS WORD AND LOW OF “TYPE” ABOVE 
1 "oe : HIGH 4 
iB? bee: “Be ee HHH . 
ie Svcs: “pre fwwes hh ‘Brte . 
i sst Bevel: “Bre eres {iMoitoneee rere 
00 1 B « eH Al 
st t. AMT 33 . 
Bbises Sect: HORS meen 31 "VecvORUL, Bus PRIORITYa1 
mies Syecre? ‘HOR piss CTORaeBLS PRIORI TY GHOER” TEST 
H SDEVM: . ADEVM Hn Reg 
fe ie? Geo SEB: AB Ef emrmnccen BESGHTION MODES 
40°: 1 SETEND: 
.MEXIT ; 
SOUE CR = 15 
BUS LF = le 
3 SRMADR: .WORD 176700 ;FIRST 55 OF OF RHLL/RNOS REGISTERS 
101 SRMVEC: .WORD 254 *RMO3 VEC 
>t 1 SLKCSR: .WORD 172540 *ADOR OF KW11-P ie Ten BaPER” 
~; i Sikcse: - WORD 172542 ; ADDR OF KW11-P 
33 “pe 104 : OF KW11-P 
1 SLKS: - HORD 177546 “ADDR OF KWLI-L Sra } paathe 
1 VEC: . 100 "ADDR OF KWi1-L_VECT 
1 PCLOCK: .WORD -1 0’ IF KW11-P IS ON SYSTEM 
18 O01 19 CLKFLG: .WORD -1 -*0’ IF A IS AVAL 
= 00131 : “WORD 74 :74 (8) IF 60 HZ SYSTEM: 62 (8) IF SO HZ SYSTEM 
20 «001314 Of STRTIN: .WORD 0 :*TYPE STATISTICS’ INDICATOR 
001 Pack: .WORD O "ld? COMMAND INDICATOR 
me at O000C DATE: .WORD 0,0,0,0,0 ‘OPERATOR ENTERED DATE 
091 OPERID: .WORD 0,0,0,0 ;OPERATOR ID 
ORIVE = SUNIT ;DRIVE # STORAGE: ERRORS 1-5 8 10 
001342 ATTN: .WORD O “ATTN REG STORAGE: ERRORS rhe -5 8 10 
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262 = . UNIT: re ; FOR PRINTOUT 
+47. $ - ; 
2 mo RE be CR oe 
3 Fa RNS; . ; ‘ 
aS A rf Jha. ah 
oe Bt y 8 . ‘¥ We ++ 
ce fy a. ; ay! ai: 
a7 (OF he? thd Sun en (MAXIMUM - 999.) 
<% MINUTE: . CMI *S CC ORED HERE 
8. 3SECOND’S COUN Ri 
eid 001 37 : 5 ; rR RE of eR TOR one secon) 
00137 IND: . WORD -1 ;ZERO INDICATOR FOR THE DATA COMPARE ROUTINE 
“oe 0 “DATA COMPAR 
:1F > 6, OCESSING "OCKER’ OR CAN’T MATCH PATTERN 
is ae 
.BYTE 0 if 'T PATTERN FLAG 
: Sivek: te 8 eM Be 
01 ERCTR: .WORD 0 : OF ERRORS 
: IMIT: Pe 3D MIT 
: . 0 : 
GRSee: : 0 a, 
= a8) Sine 
ee Eceee: ‘ 5 : vorFSeT RELATIVE TO SECTOR) 
sen ECrAT: cwosp oo tORRECTION ARSK FOR SECOND ERROR LORD 
i CWRD: .WORD O "LOCATION OF F aeRO 
CGD: ‘WORD O ; 6000 TA, F 
1 ECBADO: :WORD 0 : TA, FIRST WORD 
sees ECHRDL: “WORD : OCATION. OF SECOND ERROR WORD 
CBADI: “HonD i Bao TA,” Wore. 
2665 SECLHT: “ WORD gi. “SECTOR ADDRESS LIMIT 
sees VCINT: “WORD 821. OWL THOER COCRESS LIMIT FOR RMO3 
eee 5 p RRRRRELLEREEERE ERE LE KERR LEREEE 
ger} SBTTL COMMON PARAMETERS 
sore gs RHA KSEE L EKA S EAA REA AAA EKA AAAA AERA KAA ALARA AA AAA AA RALE 
ye BB! m9274¢ ENDCON: -HORD on2740 iJ G75x10t8 WORDS (10) [3X10¢9 BITS) 
26 001 4es 143300 ENDSEK: .WORD 143300 53x 10%6 SEEKS (LSW) 
ers 00 16g 1 PASCNT HOR 1 NUMBER OF PASSES TO_END OF TEST 
001 WORD O “MAXIMUM DATA SIZE IN WORDS 
gb8l *(FILLED BY PROGRAM AT STARTUP OR BY OPERATOR 
“DURING PARAMETER ENTRY DIALOG. ) 
2683 001464 000144 MAXER: .WORD 100. *MAXIMUM ERRORS - 100(10) 


Lore n0200,, Pegg PERFORMANCE EXERCISER sci COS 08:07 PAGE S4 SE@ 0053 


Se HASSE SNOO NOSSO SS Sons ON SOS SEDER SRE MMISORERSORRS Br 


001466 


001472 
001474 


001476 


001500 


001S0e 


001504 


001506 


001510 


001512 


000004 
000001 


. 


INTRVL: 5,0 sFIRST WORD IS THE PERF TYPEOUT INTERVAL 

(IN MINUTES). SECOND WORD IS THE INTERVAL 

8 ore pn 

FORMAT: :WORD 1 IF NOT Ou WaT & DATA 

i Eo 16 8) LTE HEADER & DATA ORDERS 
WCSEL: .WORD 0 10 RATE A RANDOM MRD 

oft 00 Tee THE VALUE IN *MAXDL’ FOR 
RATIO: .WORD 3 j REAO/WRI RATIO | 7) 

ite READ URITED 

ree At 

1g = BS 

id - 44 

75 - 3/5 

ib - 

Bri 


é 
: 
: 


sIF I “RETER BAGH AR errorel are He 
; IF EQ 0 weLee WRITE CHECK ORDERS - 


IF EQ ane NOT PRINT DATA ERROR 
; WITH OPERATOR SPECIF 


PIF NOT EO 0. PRINT ERROR MESSAGES RELATING TO 


3 
— 
3 
ay 
— 


ENDET: .WORD 1 HIF ia) .OF PASS. DETERMINED 
iIF E FO 0, ENO OF PASS DETERMINED 

PATTEN: .WORD 0 paon ROO. Y ee R PATTERN 

HEADER: .WORD 0 reat EQ To FR er DATA BLOCK 


ISELECT Se EET bata BLOCK hoohess 








5p RSRERARLAER ESSERE EE EE EEE 


-SBTTL VALUES FOR FIRST OPERATION 
3 HHHHHHHHHHEHHHHHHHHEHHHHHHHHEEHE 





BEGPAT: .WORD 10 ;STARTING PATTERN CODE [RANGE 1 - 17 (OCTAL)) 
BEGCOD: .WORD 4 ; TART ING ere {RANGE 0 - S) 

30 = WRITE CHECK DATA (*WCKD’) 

31 = WRITE CHECK HEADER & DATA (’WCHKHD’ ) 

6 = ite DATA ¢’ Tt’) 

33 = WRITE HEADER TA (*WRTHD’ ) 

34 = READ DATA (’ T*) 

;5_= READ HEADER & DATA (’*RDHD’) 
BEGSIZ: .WORD 400 ;STARTING RECORD SIZE [RANGE 4 - MAXMEM) 


3 
i 


Pil tae oT 08:04 


= afe 
pas =f= 
= ata 
- ala 
~ AG 


press SSS SSS SS SSS SRSSSRARSSASASIASSEES ASE SSSAREPPPEPEE ED EE 
88 SBE 
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VALUES FOR F 





33 rttisitititirtrtiity) 
-SBTTL TABLES, CONSTANTS, AND VARIABLE LOCATIONS 

| JEHEHEHEHEHEHEHEHEHHHBHEHHHIHEHHHHEHHHHHHIH HE 
ORDER@: .WORD 0,0,0,0,0,0,0,0,0 ;LIST OF DRIVES PERFORMING COMMANDS 


ASNLST: .WORD 0 ;A BIT SET IS AN ASSIGNED DRIVE 

DUNIT: .WORD 0,0,0,0,0,0,0,0,0 ;ADDRESSES OF DRIVES TO BE DEASSIGNED 

NEWUNT : 0,0,0,0,0,0,0,0,0 ;ADDRESSES OF NEWLY ASSIGNED DRIVES 

AVAIL 0,0,0,0,0,0,0,0,0 ;LIST OF DRIVES WAITING FOR BUFFERS/PARAMETERS 
0,0,0,0,0,0,0,0,0 ;LIST OF DRIVES WAITING FOR BUFFERS 

PARQ: 0,0,0,0,0,0,0,0,0 ;LIST OF DRIVES WAITING FOR NEXT PARAMETERS 

BUF TBL ;BUFFER ALLOCATION TABLE ENTRY COUNT 


a 
2POKKKOOQODOOODOODOOO0O000 





TE GHECK HEADER AND DATA 


3 aeaee 


EQS 
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| BEBE 


OOOOOOOOOO 4004 00-4 


asccacedee SSS5SSS55SE seuee UF OS UUM BBR | 


g PEEP EES assess Beni Sasaaaasasaasass= 


TANTS, AND VARIABLE LOCATIONS 


TABLES, 
BLKAOR: 
COMTBL: 
OPTBL 
EVEN 





-77 08:04 


nRooN 


wah HH 


Ses scosueeeesessh : 


We 


R0/00 


UU 


AIAN 


pita A 


cucuTuCuCuTUTuCucUTUTCITUTICTUCE 


8285 


one uu 





/ 


-ASCIZ /SEEK 
ASCIZ /RECAL / 
-ASCIZ /ORVCLR / 


O4SSOS Oe0040 ~ 
040503 020114 


ala 047514 042101 MNTBL: .ASCIZ /UNLOAD / 
O41S26 051114 


1104 
000040 


=U TUNON wr 
Ii ON eiuietwty 
3 HVS VS SVS BRBe & Soe SL 








PERFORMANCE EXERCISER MACY11 


MD-11-DZRNB 
OZRMBA.P11 tar > Tes 08:04 TABLES, CONST 
002212 051514 020105 .ASCIZ 
051506 052105 .ASCIZ 
020103 020040 .ASCIZ 
042101 047111 .ASCIZ 
045503 020040 ASCIZ 
051101 044103 .ASCIZ 
042113 O20040 ASCIZ 
044113 020104 .ASCIZ 
042124 052101 .ASCIZ 
044124 020104 .ASCIZ 
O40S04 020124 .ASCIZ 
122 oO42110 O20040 .ASCIZ 
O00040 
Oy7oi6 042516 O20040 .ASCIZ 
043101 42524 O20122 OFMSGO: .ASCIZ 
ies 131 
1 ti? eke 
i hog 
020124 042516 OFMSG1: .ASCIZ 
2526 
mi 043106 042523 
Os¢101 950040 : 051517 OFMSG2: .ASCIZ 
Saati peieae 105 
000 
002464 EVEN 
000 OFFCOD: .BYTE 
001 "BYTE 
000 “BYTE 
002470 EVEN 
002362 OFMTBL: .WORD 
002415 “WORD 
002440 “ WORD 





FOS 


O18 wltaate Coenttong PO hea 
/RELSE / 

/OFFSET 

/RTC 


> 7 He Me Se See Se Te a OMe OS 


/AFTER RETRY WITHOUT OFFSET/ 


/AT NEGATIVE OFFSET/ 


/AT POSITIVE OFFSET/ 


0 ;OFFSET CODE T 

1 ;NUMBER FOR NEGATIVE OFFSET (DIR = OUT) 
0 ;NUMBER FOR POSITIVE OFFSET (DIR = IN) 
OFMSGO ;1ST OFFSET MESSAGE 

OFMSG1 ;OND OFFSET MESSAGE 

OFMSGe ;9RD OFFSET MESSAGE 


5p RRRRRRELERE REEL E REE E EEE E EEE ERE E EEE RERELERE LEER ELSE ER ELE EE 


05 
RMO3 PERFORMANCE EXERC =JUL-77_ 08:07 PAGE 58 SEQ 0057 
: TABLES, CONSTANTS, AND VARIABLE LOCATIONS 


3 
3 
: 
y 
© 
2 


-SBTTL DATA PATTERNS 
5; SHEE JHE 


STNDAT: . pare ;STANDARD DATA PATTERN POINTER TABLE 





DA ; ZEROES 
DATAI +642 ; ONES 


DATAO: ;DUMMY DATA PATTERN 


Coy Rtn en eee 





8 OOOO COKOOOOOOO000oO 


ba 


DATAI: ;STANDARD PATTERN 1 


SSSSSSSSSSSS505 SSSSSSSSSSSSES SESSSSSSSSSSSISSS 


NR 
See 


RRO Bee 


SEQ 0058 
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HOS 


DATA PATTERNS 


RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 


_ 


-77 08:04 


27- 


MD-11-DZRMB AO/00 
OZRMBA.P11 


;STANDARD PATTERN 2 
;STANDARD PATTERN 3 
;STANDARD PATTERN 4 
STANDARD PATTERN S 


: ee FESS SS SS ae i 


a dd ot ad a ad a a tg Hh HHH 


: as ania ipa ae 


oo dg og oe ed ee I 


De ee ad ed a a ed of oH 


SaeadREGREEC Eee OOOERE ROEM REEeEeerEE oot 





105 


SE@ 0059 


! 





3 

2 i : “ 

; : 
{Se Ma tt 
gi SGRGRGRGRGEGE SGUQUGRQREREESNS epepeqeqnenenene eqeneete 
& 

: 

: 

EY, Ropenennanas | 

& iit ttt tet tt ui Ht, 

: 


er 





9G) GI GIGI GI GIG) GIG) GIG) GG) GI) GIG) GIGI GI) GC) GWIGIGIGI WI WIGIGIG) 
~BRBVRRPSRV ae Non cow SSBIRREBRH 


bere | 


i 
: 
: 








JU 353 ' 
' N333¢ 








2 
: 
F 
3 
© 
2 


He & 


TREN RAR R RR —s 


SS 


RR 
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DATA PA 





sSTANDARD PATTERN 9 


SEeoEGsectOreee FER 


sSTANDARD PATTERN 10 


SEES & 


2 
y 


aS 


be br be a be ae 8 fe Re tm be Ro 


x 


;STANDARD PATTERN 11 


es 


SSSSSSS955555 SSSSSSSSSSISSS08 SESSSSSSSSSIIGSS SSSSESES 


ne oe 


: 


SE@ 0060 


SEQ 0061 
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KOS 


RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 
DATA PATTERNS 


-77 08:04 


A0/00 
Pll =. 27-JUL 


MD-11-0 





;STANDARD PATTERN 13 


;STANDARD PATTERN 14 
STANDARD PATTERN 15 


077777 + ;STANDARD PATTERN 12 


Ses aaa As 


a St eH ome ed hh a hy ee 


; RESESSESESESESSS GSESSGSESESSSoes Seeeesegegaeeess 5 


Ieee 
155555 


eee ae cee SS : 


a nd ed ad wd wd wh wt 


hd ed dh I 





MRABRRRS SSS SF PLS PT RHMNAHRRGRHSSLoSSRGBORAR RARER RR BOBO ooo 


CDDLD LDL LD DDD CD. CPDL DDD DOD DDD ODD DLO DDD CDCI DODD DODD IOI OIOIOIO ICICI ICID 


MD-1 PERFORMANCE EXERCI Y11 30(1046) 27-JUL-77 08:07 PAGE 63 SEQ 0062 
OZRMEAL il oun 08:04 DATA PATT! 


3188 


Ssssssssssssees 





Sieh ieteteeietetteteie ts 
= SRRLSVLES 








MD-11-DZRMB AO/00, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 64 SEQ 0063 
ERROR POINTER TABLE 


OZRMBA.P11 


SEN NERS 


Ob b= bo 0b eb pe eee 


WO NGWU£Wwr-O 


eS RASS SINAN 


o En Be Ee Ee Eee 





27-JUL-77 08:04 
-SBTTL ERROR POINTER TABLE 
TABLE CONTAINS THE INFORMATION FOR EACH ERROR 


a rrails f A hunger eolcates ted 1 La eal 1S PERTINENT. 


Y PERTINENT DATA 


Ten IN tet TABLE CONTAINS 4 POINTERS. SXPLAINED AS FOLLOWS: 


;;POINTS TO THE ERROR MESSAGE 
INTS TO THE DATA HEADER 


INTS 10 THE DATA FORMAT 


;RH70 INTERRUPT OCCURRED (RMAS = 0) 

;UNEXPECTED ATTENTION OCCURRED 

;MASSBUS PARITY ERROR (MCPE=1) 

;MASSBUS PARITY ERROR (PAR=1) 

;ADDRESS PLUG BIT CHANGED f 
/ 


A 
;RH11 DIDN’T RESPOND TO ADDRESSING 








MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACYI1 30(1046) 
27-JUL-77 08:04 


OZRMBA. P11 


: 
: 


SN Se AS 





Sees ae eee y Ae MYC PSHE TS RASA BARRA SUSU Ud 
Sess a) cece eee Ee ee 











gst 
ees 
1 

ocoo04 
T7870 


1 
177907 


Bs & 
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ERROR POINTER TABLE 


pre 
5p RRREREREREEEE SELES EELS EERE EERE EERE EEE EEE ERR EL EE REE REESE 


-SBTTL SETUP AND INITIALIZATION ROUTINE 


; START ADDRESS = 200 
; ADDRESS TO CHANGE RH11 UNIBUS ADDRESS = 204 





5p RRRRERE EEE EERE EEE EE EEE EEE EEE Be? SREEE 
START: MOV 8-1, CHGADR ;SET RH11 ADDRESS CHANGE “L9G 
BR START : START THe 
STARTI: POV SHOU EHGAOR «CLEAR THE RHI AOORESS CHANCE FLAG 
Tar persgmpemmnges 4 sages ¢ 
#1, STESTN 5 SET TEST NUMBER IN APT MAIL 80x 
Sete: eat mens tot” bee Sta 
CLEAR CLEAR The BeE The tas "tSCRTAG) AREA 
iif] T LOCATION TO BE CLEARED 
COR pm MEMORY LOCATION 
if hn ; ;DONE? oe 
Rov. ies Sp fa STACK POINTER 


E 
7 
- 
Ri 





HOV aENT, VgcTOR FOR ERROR ROUTINE 
HOV i tee. {VECTOR FOR TRAP CALLS j 
HOV oe +r R_FRILURE VECTOR 
MOV 33 THE RANDOM NUMBER GENERATOR 
SIZE FOR A MectéfeR’ ten ae cm it IS 

* EQUAL 8 A ert 
MOV at Fone Sie SHICH REGISTER 
MOV AND A prouAeE ISPLAY REGISTER 
CMP 2: TRY TO SUR 
BNE j | BRANCH I NO TIME TRAP, OCCURRED 
BR : + BRANCH TF nO i ne at % 

64S: HOV *:SET UP FOR TRAP -RETURN 

65S: MOV ;;POINT TO SOFTWARE SWR 
MOV DISPLAY 

665: MOV ;;RESTORE ERROR VECTOR . 
CLR 
BITB : SOP TSIZE, SENVM it Test USER SI 
BEQ 67$ ::YES,USE NON-APT SWITCH 

te MOV SSSWREG, SWR *:NO,USE APT SWITCH REGISTER 





SLT EAE SO Lilt A” Ow mee 


r 
> 
r 











Po : 000011 000041 
iS iz DOS? 7 odood42 
IIS 13 nae? 001224 000001 
re 154 023727 OD11S4 000176 
; : mo 
3336 i 00040: 
: i 1 7 000001 001150 
KK: 1 105737 001224 
Bo fren fig, ones 
a3 ol 001272 
ae ie, fle Galle 
a mC = ese 001150 
I4eS6 9001015 055676 
il Wed Bee BAT coy 
3353 Bae 13737 lets 034320 
1 
= sit 
ae ie ian 
a0 ; 002102 
Seared 
Be lee, Ooigs onsve 
ina] 004354 001366 
ee ee ae 
| an elt 
37) poviog pasta 001464 


1$: 
- SBTTL 


3$: 


ey SBOE 
Fire Hine 

Be thu 

Re 

Ta PCO STRINT 
Ger VALUE Ai SOF TWARE 
cr i sv “ 

CMP SWR, 8SWREG 
8 69S 

BR 69S 

MOVB = 81, SAUTOB 
TSTB = SENV 

Ee, SVECTI 

Be Sg 

MOVB CT1, SRMVEC 
TST 

BEQ +10 

MOV SBASE , SRMADR 
MOV , RMADR 
MOV C?RMVEC 
an 08 

BNE 2s 

ISR PC, BUSADR 
MOV : 

HOV SRMVEC, RMVEC 
BNE 

ISR 

CLR STATIN 

MOV : 
CLR (RS)+ 

CMP , 
BNE 3$ 

MOV STACK, SP 
CLR PS 

MOV HZ, SIXTEE 
CLR 

CLR MI 

€LR SEC 

€LR INTRVL+2 
CLR PACK 

CLR 


C 
BIC #170000 , MAXER 


five’ PRIORITY Yo 4 


Hin IN MODE ? 
AN RMOS ? 


The KEVEORAD INT HOW TO TEST DRIVE 0 






shit 

$3 NG UNDER XXDP/ACT? 
99 

es NG UNDER APT? 

t ERANCH. 1 

s3 — REG SELECTED? 


PIGET SOFT-SWR SETTINGS 
;;SET AUTO-MODE INDICATOR 
;RUM UNDER. APT NODE 


aay IF = 0 
i 
ne, DRIVER 


VECTOR INTO DRIVER 
abe MODE ? 
{CHECK RHL1 BUS ADDRESS 
'RHI1 VECTOR ADORESS 


SFIRST START ? 
: IF NOT 
GET T 


DATE AND OPERATOR ID 
t START CHART OF AREA TO" TO 


SUMMARY TYPEOUT FLAG 
CLEAR 

;LO0K_FOR END OF CLEAR AREA 

;BR_IF NOT FINISHED 


. Te ATUS WORD 
j1/60_TH OR J SECOND COUNTER 


oe 


rs ERROR LIMETS ARE NOT TOO HIGH 


VALUE 








MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 67 SEQ 0066 
DZRMBA.P11 27-JUL-77 08:04 GET VALUE FOR SOFTWARE SWITCH REGISTER 
a ;ROUTINE TO DETERMINE BUFFER AREA SIZE 
OOwHOg 005227 177777 SIZMEM: INC 8-1 SEE IF TIME TO SIZE MEMORY 
3379 Bouuia Sodva? osseoo ae pe 851 aro a rs 
37% 1 74 001354 MOV ae 
1375 1 1 001700 1S: MOV sist 
a0 1 150 001702 MOV TING A 
3381 1 1 001704 MOV TAD, OBC TON TABLE 
Fe Toists 001354 160000 ° Ce L3TAD;e160000, ei a ow 
At 1 001704 MOV #160000, BUFTBL+4’ :XXDP MAX MEMORY 28K 
fe oun ey fain ki alae 
a 001704 a #100 BUF TEL +4 oor cores’ L 
et ES oes re 3 ‘ :Con® Fron oop OR oTreR OR ? 
& Ibera? 001704 #1400. ,BUFTBL+4 ° on "ote" FORDER SIZE 
Se oe Sites ss: ie WAL IN MAXDL? 9 
3393 530 «00 BNE 45 *BR IF VALUE 1s 
Be Goes Slee soon oo a rex 
i l 1 4§ CMP MAXDL , *I T LARGE ? 
eH OoveNe 103403 BLO cs BR IF NOT 
3397 013737 001704 001462 MOV BUFTBL+4, USE MAX AVAIL MEMORY AS MAX BUFFER SIZE 
004556 013737 001704 354 Ss MOV BUFTBL+4;PARLST+2 ;VALUE FOR THE PARAMETER TABLE 
o SEE IF THE OPERATOR WANTS TO CHANGE ANY PARAMETERS 
5 rite 001150 LKPAR: ISTB sauTog 5 ome” yetein MODE OR ’ACT11’ OPERATION ? 
° 001224 TSTB sen sAT STAND ALONE MODE ? 
104401 001201 ae. SOME ; 
104401 TYPE | ASKPAR ASK FOR PARMETERS 
y Jovi ROLIN *READ THE opNIRY 
2103 12603 MOV (SP)+,RS : ENTRY TO RS 
1 19 122715 000131 CMPB sé’ Y, (RS) ; A ’Y’ (YES) 
gil 501013 BNE SETVEC *BR IF NOT ’Y? 
1 1 054352 ENTPR: MOV SPARLST,R3 ‘PARAMETER TABLE ADDRESS 
M1 737 Oeb420 JSR PC, PARENT ;GET THE 
git OOv6-32 001462 oo0004 CMP #4 sis TE, PaO VALUE OK ? 
is 1 BHIS SETVEC IF IT IS 
Zig OO4642 012737 OO0004 001462 MOV #4, MAXDL :SET ’MAXDL’ TO THE MINIMUM VALUE 
18 ; DISPLAY TPBIVE STATUS AND i UP THE OTHER SYSTEM DEVICES THAT 
004737 O22412 SETVEC: JSR PC, CKCLK 
a ae OOH? 37 O34 on 5k PC RAINIT bPNTTIAL LTE THE THE NOS DRIVER 
Boots 17> Decabe ADD e180 . ICHECK FOR FIRS Isibre FLAG 
004674 1 BCC 11 *BR IF FIRST START 
004676 o00004 174250 BIT #SWO2, ISWR *TYPEOUT THE DRIVE STATUS TABLE ? 
a] 004704 001061 BNE 10$ BR IF NOT 





DOE 


SEQ 0067 


if : 

Sagb of 
aeetiee cH 

3 ee eye 

g 5.4 8g E 8 ye, 
; Eg HSEE sot F + a ERE ie 
é s 5S Yo e enue = S. =F Gee oe a : . 
5 #5 Sieccee Zooey Bae SS Sue SeptoateS Ss 
7 Be Cana tial | Nettie 
3 : : 
: — § z é a7: a ; : : g # 
eS 5 +] : ; Fatrt} 
= 28 bg ies Eontststshsetees Btebes S yhesieieeet e. 
: oft 5 Enatieyhaet' ttt teaeot ht nutans ; ngrpmephan et ae 

., 


ORMANCE EXERCISER 


32 


r 
& S bee bibghe Po BSR GSGE 
2 iy Ce PeSUSRENSS 
B: Runge & 
“ ep asvoneeo ene rrr ny IT RADERNURTRDFEN asecTeceeTcresty 





E06 
ALT? OED IO OME PY ONE Heel MO oe on 








zie 73 001150 FOWTI: STB SAUTOB sAUTO MODE ? 
1 1 MOV #1, RATI uP 
1B epee, ates MOV pape PnocoN >SET LSW OF ENDING VALUE 
1 000027 001452 MOV #27, ENDCON+2 SET MSW _OF ENDING VAL 
BR route START To WRITE AND TES 
4 001356 1S: ST CHAD :START AT 200 ? 
0 1 FOWT2: ate Rl DRI £ 
eh pTiee Re eX 
> oo0024 000041 CMPB «#24, 41 *LOAD FROM DRIVE RMO3 
54 me 86OAF 1 Oe aeT FROM DRIVE 
> TST tA3)4 : INDEX : 
Ss 1 034170 1S: 1STB DEVSTACRI) *DRIVE ON LINE ? 
002102 MOV (R3),RO0 LOAD 
es ie so Gam eee, 
JSR RS, GETADR ;RETRIEVE BAD SPOT FILE 
ae i 1570 MOV 20 NEWINT(R2) : Gee TO ABAIL QUEUE 
ey 1 Gait 000106 Se Sint ,MAXCYL(ROS ;UP CYL LIMIT 
3508 1 001444 000112 MOV TRKLMT,MAXTRK(RO) ;UPPER LIMIT 
3509 Iie 000116 MOV SECLIT MAXSEC(RO) :UPPER SECTOR LIMIT 
$10 x 11 CLR MINCYL{RO) s CLEAR Li LIMIT 
i Hs ch meetin) Fete Ue nt 
#18 OoNr37 ech ISR PC Faas PREP TERS 
3514 2S: CMP (R3)+, (R2)+ > INCREMENT INDEX 
31 I INC Ri *NEXT DRIVE 
31 1 000007 cH 07, R1 sALL DRIVE ASSIGN ? 
218 3c 001316 CLR PACK TEST PACK FLAG 
ej HESS Teer re) ours, me "thon «Ei "Intl EMU esRD SUPER Lor 
st 005346 000137 005524 "IMP MAINI *START THE PROGRAM 
3928 ; ; SDOAGN: IMP START ;START AGAIN 
et | JB HHHHHEHHHHHBHHHHHEHHHHHHHHHHHHEHHHHHE HHH HHHHHEEEHHHEEE HEHE 
3e8 .SBTTL MAIN PROGRAM 
28 ‘ | HHH 
005737 001522 MAIN: TST ORDER ;DON’T DEASSIGN ANY DRIVE IF SYSTEM NOT IDLE 
goi4 BEQ 1s LET ALL DRIVE FINISH WITH COMMAND 
aes 1S: TST CFLAG ;KEYBOARD INTERRUPTTED ? 
3534 do14Ge BEQ *BRANCH IF NOT 
=s 004 023710 ISR PC,KSR *SERVICE THE KEYBOARD 
012703 000010 MAINDA: MOV #8. ,R3 ;DRIVE COUNTER 
28 O0S402 012705 O01S46 MOV 8OUNIT,RS *ADORESS OF "DROP DRIVE’ TABLE 
005406 005715 1S: TST (RS) SEE IF ENTRY AT PRESENT POSITION 





RMO3 PERFORMANCE EXERCISER  MACY11 30(1046) 27-JUL-77 08:07 PAGE 70 SE@ 0069 
: MAIN PROGRAM 









27-SUL-77 08:04 
001011 BNE 3$ ;BR IF THERE IS ONE 
ooooce 2s R00 ,RS : Tg T POSITION 
$ 
BNE 1$ ; T CK 
001544 TSTB > ANY DRI ACTIVE ? 
BNE MAINI ;BR 
IMP *CHECK FOR MONITOR RETURN 
1 001612 3$ MOV SAVAIL,R1 ; “al AVA LAGLE DRIVES’ TABLE 
il 4§ ts RL) ioe THLE 
is cH (RL), (RS) :1S OR ont FP: cee fe 10 Be DROPPED 
1 oo000e2 ADD #2,R1 ia Ir Wes "AVAIL’ TABLE ADDRESS 
t 001634 S$ RY MAT. RI SOME IE hoonees WAIT TABLE 
: ay 6S: TST (Rl) ” :AT “ayy IRE a 
3556 D4 001 BEQ BR IF SEE I * REQUESTS 
3557 net 021115 CMP (R1), (RS) DRIVE IN N N THE Sart" ae . 
228 ey rena ooo00e2 Abo #2, : WAIT’ T ae 
$ 
= fees Hh ~ & te Ra ae Mil EE 
iy BEE at Neer PE HEE Peed 
304 eae 15 CLR (RS) EAR TH a DRIVE make ENTE ENTRY 
005514 005011 CLR (R1) ; REMOVE DRIVE FROR THE aghWRIL” OR "WAIT? TABLE 
bos516 004737 017456 JSR PC, CMPRES > COMPRESS tive T 
000733 BR 2s SEE IF ANY MORE 
3568 ;LOOK FOR DRIVES TO BE ASSIGNED 
000010 MAINI: MOV #9. ,R3 ;DRIVE COUNT 
CLR R2 ; AVAIL’ 1 
CLR RY ASSIGN L OFT woex 
3574 CLR RS :NEW DRIVE I 
001570 1S TST NEWUNT (RS) iNEW DR NOetrs POSITION 
1 BNE 3$ : IS 
062708 oooo02 2s ADD #2,RS :T 
INC RY * INCREMENT ASSIGN INDEX 
DEC R3 ; DECREMENT DRIVE COUNT 
380 1370 BNE 1§ *BR IF MORE DRIVES 
30 BR MAIN2 START OPERATIONS FOR THE AVAILABLE DRIVES 
104401 052755 3S TYPE UNTMSG : DRIVE’ 
10446 MOV RY, -(SP) s R4 FOR TYPEOUT 
ee 33 DRIVE NUMBER 
104403 TYPOS 2360 TAL ASCII 
002 BYTE 2 >: TYPE 2 DIGIT(S) 
000 0 ij LEADING ZEROS 
1 77 ASGND : STARTED’ 
lolz 4S: TST VAIL (Re) iat ENO OF AVAILABLE TABLE 
#2, R2 HInCRENERT aval TABLE 
35 BR 4§ “CONTINUE LOOKING FOR END OF TABLE 
2 1 1570 OOl612 SS: MOV NEWUNT(RS),AVAIL(R2) ;MOVE ADDR OF DRIVE INTO AVAIL LST 
4 15 CLR NEWUNT (RS) “TAKE ORIVE OUT OF NEW DRIVE TABLE 
3595 156437 034304 001544 BISB  ATABIT(R4Y),ASNLST ;SET DRIVE ASSIGNED INDICATOR 





: 
: 
; 


tek PERF ORMANCE eae MACY11 30(1046) 27-JUL-77 08:07 PAGE 71 SE@ 0070 
-77 08:04 MAIN PROGRAM 


ADD #2,Re ; INCREMENT AVAILABLE TABLE POINTER 
BR ;LOOK FOR MORE DRIVES 


wi it ed find AND START ORDERS FOR ORIVES IN 
MAINE: ist ~~ ie Te TH aie ere F REFER REQUESTS 


1$: rs! AVAIL (R2) ‘Any AR DRIVE “waiting FoR Pa PARAMETERS 


wires 9 


MOV AVAIL (R2), RO : 
TST SNEXT (RO) a worans ? 
‘BR IF THEY HAVE 
:? "OR -W” COMMAND FOR THE DRIVE ? 





BNE 

1 R 

1 BEQ cs BR I 

1 ISR PC, WRTPK : bara PARAMETERS 

wid BR a $ 
18 58: ISR PC, SELPAR iS CT PARAMETERS 
xis 7$: CLR =(ob) ™ SAKE. ROOM ON THE STACK FOR THE BUFFER ADDR 
RV (SPS¢, SBUF(RO) ROVE ADOR TO DPB 
BEQ BS -BR IF °O’ ADOR (NO BUFFER) 
ISR PC. FILBUF *FILL THE 
CLR SFAIR(RO) : R He OFA RNESS’ 
JSR PC, GODRIV : DPB IN DRIVER 
MOV SORDERG, RS : ADDRESS QUEUE IN RS 
TST (RS)+ END OF ? 
BNE .-2 *BR IF NOT 
HOV RO,-(RS) : PUT BLOCK ADDRESS INTO QUEUE 
QS: ADD #2, Re SRORERENT PROEX 
BR 1$ ;BRANCH BACK TO FIRE NEX NEXT DRIVE 
10$: MOV SAVAIL,RI1 > VAT ng ABLE ADORE 

ADD Re, RI ; FORM OF LAST EO RY 
ISR PC; CMPRES COMPRESS T 
BR 1 CONTINUE LOOKING 


;GET BUFFER ASSIGNMENTS FOR DRIVES IN THE *BUFFER WAIT’ QUEUE 


;WAIT FOR AN ORDER TO FINISH 


IDLE: MOV 8ORDERQ, RI ; 
1S: MOV (R1)+,RO PUT BL 


eases See ea AA AHA AAA RCA EC AS hee 





OCK ADDRESS INTO 
BEQ ;BR_ IF END OF QUEUE 
TST STATUS(RO) ;SEE IF DRIVE a 
BEQ ;BR IF Orie NOT FINISHED 
SUB , ; CORRECT QUEUE POINTER 
MOV R1,-(SP) ;SAVE THE ADDRESS 
JSR PC,STATIS ACCUMULATE STATISTICS FOR DRIVE IN RO 
NOP ; DEBUGGING AID 
JSR PC, PROCES SS END OF ORDER 
3651 CLR BADSEC ‘CLEAR THE BAD TRK/SEC ERROR INDICATOR 


? 


11-DZRMB AD/00 





RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 72 
MAIN PROGRAM 


SEQ 0071 


DZRMBA.P11  27-JUL-77 08: 
004737 026674 ISR PC, ;SEE IF ANY DRIVES HAVE TOO MANY ERRORS 
5 026722 JSR PC’ EOP SEE IF ANY DRIVE HAS XFERED 3X10f9 BITS 
6060 (OL MOV (SP)+,R1 RESTORE THE OROER TABLE INDEX 
MeNGe O1 001612 “ ov sAVAIL, RS FIND END OF THE "AVAILABLE’ TABLE 
06070 001 ; BNE ’BR IF NOT AT END OF LIST 
BOGE ties MOV Bi) -(RS) ‘ROVE Ie OCK ADDRESS INTO THE TABLE 
ton Besos Bisees eR BR’ REL BU REST ns 
7 IDLE1: ‘ 7 
i 93277 000004 173042 1S: BIT #SWO2, ISWR TYPE PERFORMANCE SUMMARY 
112 001007 BNE 2s *BR IF NOT 
ae ooeieg ate 001314 TST STATIN j LIME TO, TYPE THE PERFORMANCE SUMMARY ? 
B 5061 901314 , Start *CLEAR THE INDICATOR 
ee Boers Boas 25: JeP MAIN SCONTINUE THE LOOP 
3670 ;SETUP TO REFORMAT AN ERROR SECTOR 
136 000001 173010 REFMT: BIT aSWR : Y SWITCH SET ? 
= Betas te h BNE x BR TF IT 15 
=r Gobiss Geigy Sem 175000 be $SH7,#SHR ;SHIT ee’ 
7 12 001474 TS FORMAT tERITE HEADER & DATA ORDERS ALLOWED 7? 
0061 14 BEQ REFMTX *BR IF NOT 
i CHP e821. , SRMDC(RO) VALUE . 
74 ISR PC, READOR tet NORRECTED CD SECTOR-TRACK ADDRESSES 
ye SSSR) roc alge Hoey 
MOVB (SP), $NSEC(RO) ;SECTOR ADOR TO DPB 
oa MOV -aStie (RO) = WORD FOR FORMAT 
’ TOR , RS, CHKADR *AVOID REFORMAT BAD 
BR 2s *BRANCH IF NOT ON BAD SPOT 
3088 BR REFMTX : F ON 
2s: JSR PC, GETPAT GET A PA 
2 MOVB §RS,SNPATC(RO) ;PATTERN TO CONTROL BLOCK 
MOV #-1,SNEXT(RO)  ;SET PARAME SELECTED INDICATOR 
= REFMTX: RTS PC * RETURN 
a4 ;PROCESS THE ORDER TERMINATION 
% PROCES: MOVB (RO), UNIT DRIVE NUMBER FOR ANY ERROR MESSAGES 
71 Tot STORRS PF tavern SIGUEED Mt 
see o7¢ BI! aGTT15, SNCSICRO) © SEE wi ’SC’ SET 
a) 063 BIT SBIT14, SAACSICRO) © SEE off Fre: SET 
BIT #81714, SRMDS(RO)’ eo: IF ’ERR’ SET 
oe tee s 2 Eeee |e ame ces maa 
3707 BIT #SH01, ISWR DATA COMPARE ? 








3 
i 
: 


3 7 
er 


RRARKARS. 
NOW EW 


PERE Rn ER UNG EP RP STE EPONA ADORNS ASN DA SRE 


vw 
a = 
atta - 





ieee 


bit Bee oof 


<= 


8 


3s 
ah 


cee Ge 


1111 


i 


a3 


ioee 


43 


PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 73 SEQ 0072 
08:04 MAIN PROGRAM 
BNE 2s :BR IE NOT 
012616 ISR PC, CMPAR : NO , COMPARE DATA 
2s: RTS PC : RETURN 
;ORDER TERMINATED WITH AN ERROR - PROCESS THE ERROR 
000200 000016 ERPROC: BIT #81707 , STATUS(RO) jDONE BIT SET aes ™ . 
007004 The BONE” sR IE SPER WITH ° , hat ae 
;PROCESS ORDER COMPLETION WITH ’ERROR’ & "DONE NOT’ BITS 
010000 000016 ERPRCI: BIT #81712, STATUS(RO) -SEE IF DRIVE WAS UNSAFE 
004000 000016 BIT T11, STATUS(RO) PARITY RR 
002000 000016 BIT 8B81T10,STATUS(RO) ;FATAL PARITY ERROR? 
BNE FAL PAR - BR If IS ONE 
001000 000016 BI #BITO9,STATUS(RO) ; TIMEOUT? 
BNE SUT IH -BR IF YES 
ovo002 000016 eit s81 14tBITOL, STATUS( » HORIVE WENT OFFLINE ? 
000004 000016 BIT aB1T2, STATUS(RO) PORT REQUEST TIME OUT ? 
RS OPE PRE TE OID 
;DRIVE IS PERSISTENTLY UNSAFE 
001201 PUNSAF: TYPE  ,S$CRL sCR-LF 
046222 TYPE ‘EMI * DRIVE UNSAFE’ MESSAGE 
053452 TYPE ‘DRIVE NUMBER 
001344 MOV UNIT, -(SP) 33 UNIT FOR TYPEOUT 
se he NUMBER 
TYPOS ;;60 TAL ASCII 
-BYTE 2 3; TYPE 2 DIGIT(S) 
"BYTE O :: SUPPRESS LEADING ZEROS 
ate ist it 
I JSR LINE1 *PRINT LINE 1 OF ERROR MESSAGE 
046222 DISPLY ,EAle *PERSIS DEVI UNSALE MESSAGE 
Jedey ISR PC, LINE2 sPRI L Ne OF ERROR SSE 
020650 JSR PC’ LINES PRINT L OF ERROR ME 
021320 JSR PC; LINEY “PRINT LINE 4 OF THE ERROR MESSAGE 
Hed JSR PC; INCTOT ?T TOTAL ERROR COUNT 
1 JSR PC’ LINE? *PRINT LINE 7 OF ERROR MESSAGE 
IMP DROP ;DROP THE ORIVE 
;UNCORRECTABLE MASSBUS PARITY ERROR OCCURRED 
001201 UCPAR: TYPE ,SCRLF ;CR-LF 
046124 TYPE EM10 : UNCORRECTABLE PARITY ERROR’ MESSAGE 
BR FALPRI ‘FINISH PROCESSING THE ERROR 
FATAL’ MASSBUS PARITY ERROR OCCURRED 
001201 FALPAR: TYPE  ,SCRLF ;CR-LF 
046167 TYPE ‘EMII : FATAL PARITY ERROR’ MESSAGE 





A0/00, RMOZ PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 74 SEQ 0073 
11  27-3uL-77 08:04 MAIN PROGRAM 


FALPRI: TYPE DRNUM ;D0R 
MOV UNIT, -(SP) aE UNIT FOR TYPEOUT 





1G get Mark 
HALT ‘ERROR HALT 
1S: RT PC 
;SOFTWARE TIMEOUT OCCURRED 
006620 004737 020176 SWTIM: SR : PC LINEL s PRINT LINE 1 OF ERROR MESSAGE 
hba743 eae J "LINE? :PRINT LINE. ‘7 
eae fe Fectiey © ipa tite @ & Eg rece 
4 Boa ps4 50 JSR Be TNCTOT :I TOTAL ERROR 
S060 004737 021730 JSR PC, LINE? iPRINT LINE 7 OF ERROR 
DRIVE WENT OFFLINE 
104401 001201 OFLIN: TYPE  ,SCRLF ; 
IoMOL TYPE "EM14 : DRIVE WENT OFFLINE’ MESSAGE 
006672 013746 001344 MOV UNIT, -(SP) ts IT FOR TYPEOUT 
006676 104403 TYPOS . 5360 9 TAL I 
oY Be ts, eve 6 1 OPPRESS CEAOE 
2 ao737 020176 JSR ; PCL INEL i PRINT LINE 1 OF THE ERROR MESSAGE 
7 Oora7 pob3q3 OUSPL PC, LINE2 PRINT CONE 2 OF ME 
r37 pot seD Jer PeTCINES PRINT CINE. OF THE ERROR MESSAGE 
boeres wee B54a5q J5R Pe TNCTOT ‘I TOTAL COUNT 
Operas bod1a? DLEPa et el DROP THE DRIVE, Te ERROR MESSAGE 
5 
;PORT REQUEST TIMEOUT ERROR 
737 020176 PRTIM: JSR PC, LINE! ; TYPE LINE 1 OF THE ERROR MESSAGE 
Oe tA 046350 DISPLY EMIS : PRINT PORT TIME OUT MESSAGE 
004737 O20242 PC, LINE2 ;TYPE LINE 2 OF THE ERROR MESSAGE =. 
Oe ne rae Jee OPG’L INES tYPE CINE & OF THE ERROR fecemce OC 
53 3424 JSR PC; INCVOT : INCREMENT TOTAL ERROR ebuntT 
006778 004737 021730 ISR PC; LINE? ‘TYPE LINE 7 OF THE ERROR MESSAGE 
000207 RTS eee * RETURN 


;PROCESS ORDER COMPLETION WITH ’ERROR’ & ’DONE’ BITS SET 





FO a er en Cres CE 


' ee 4 


Semen 


SS 


TLONE ERRNO 
HE 


SEKKEKERESS 





007312 


8 
: 
x 
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MAIN PROGRAM 


010041 


000016 DONE: 
000244 
000246 
000250 


1S: 


Sigeeeene 


3$: 
4§: 


IT 


apes fated bates tutes led tuiey fais tit fated bu 


: edemecee. ay ore OCCURRED 


aera swcszeno} 1S Petit 
SI, oso a 


81713, SRNERI(RO) ;’OPI’ SET? 
oh NO 


ER 
we te SRMER1 (RO) "ig PaR” SET? 


‘i a 
9, SRMERI(RO)’ ; au SET? 


.on IF IF NOT SET 
IT10, SRMDS(RO)' -*LST’ SET? 
IF NOT 


SE 
’LST’ SET. EXIT 
IT12, matael ‘ROeeee IF OTE’ SET 


OTEER se bre: ERROR 


SRMERI(RO) © ;SEE_IF *DCK’ SET 
+6 ;BR IF NOT 


DCKER 
#81T14!B1T13, SRMER2(RO) :’SKI’ OR 'OCYL’ SET 
3$ BRANCH fF SKI, OCYL SET 
#BIT1S, srnero role Bao -BAD SPOT 

4§ ; BRANCH H IF $0 (NO, OTHER ERROR) 


DRVER 
oo REPORT SKI _ERROR 


EXIT FROM ERROR ANALYSIS ROUT. 


;PROCESS DATA (’DCK’) CHECK ERROR 


000300 OCKER: 


CMP 


#10041,SRMEC1(RO) ;VALID POSITION COUNT ? 


SEQ 0074 
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101407 





AEN | 
SiNlaccGan MEniauunnccee 





001346 
000250 


001350 


000016 


001351 





14S: 


BReaea2 


ig 


;BR IF NOT VALID 
SRMEC1(RO) sBOSt It N COUNT 0? 
SRMEC2(RO) : N PATTERN REGISTER ? 
4§ fe YES 
BS LINE1 a erect ied OF ERROR 


et iy, *INCREMENT TOTAL ERROR 
3 9 ORDER 
a seeee ; LINE Oe ort MESSAGE 

5 s 

t FINTSH THE ERROR REPORT 

PC, LINED : LINE 6D OF ERROR MESSAGE 
PC, LINE7 : LINE 7 OF ERROR MESSAGE 

, SPOTCK SEE IF ERROR AT A BAD SPOT ON THE PACK 
Be LINE i AeTAP L re 1 MESSAGE 
sche! pata che MESSAGE 
Pet INES ‘PRINT tine Q oF MESSAGE 
PC LINES iPRINT LINE 4 OF SSAGE 
PC’ PRT “SEE IF BAD SECTOR TO BE PRINTED 
#BIT1S'BIT12:BIT06, MASK ;LOAD ERROR MASK 
eG1T121B1 06, SAMER] (RO) “CHECK ’DTE’ & ’ECH’ 
PC, LINES : PRINT SF & OF ERROR MESSAGE 
BS FINISH THE ERROR 
#16. ,RETRY RETRY COUNT 
Rl *R1 IS OFFSET CODE POINTER 
PC, GODRIV . 
$TATUS(RO) tect FOR DONE 
3$ ?BR IF NOT DONE 
10$ ;BR_IF NOT ERROR 
88177, STATUS(RO) ai iF ORDER TERMINIATED NORMALLY 
PC, INCTOT t INCREMENT TOTAL ERROR COUNT 
LIiNeM -*DI ERROR DURING RETRY’ 
ERPRC1 > SEE bial 
MASK, SRMERI (RO) jLOOK A ERROR 
cs : BR FD FFERENT ERROR 
#81T12!B1T6, SRMERI ( -*ECH’ OR 'DTE’ STILL SET ? 
7$ ;BR TF NEITHER SET 
RETRY+ : RETRY COUNT 
RETRY, RETRY+1 ? 
2s *BR IF NOT 
Rl :T TABLE INDEX 
OFFCOD(R1), GENOPE+SF HT jOFF SET CODE 
9 BR IF END OF OF FFSET TABLE 
#2, RETRY *NEW RETRY L 
PC; OFFST : OFFSET 


SEQ 0075 











z 
8 
: 
48 
ey 


pty. EXERCISER MACYI1 30(1046) 27-JUL-77 08:07 PAGE 77 SEQ 0076 
MAIN PROGRAM 


é 3 
4 


;SEE IF oo WITH OFFSET 


8 

3 

g 
By gee 
RISANS 


ue HE & ES OF Te erton ressace 
GREEMT 


SING EC ECC AND CHECK IT 
MESSAGE 


a 


001376 11S: 


82 

rf 
ity 
- 
er 


THe ERROR SECTOR 


ERE FURR CE RRRRERREE 
G Gers & 
2 Ba 
segue 
ig eek 
& "ae g 
Bere a3 
conducts 
3 


ANI EN RTE TTT rie | 
ce 
3 
of 
AEBS 
2 
tate 
BoP 


rate 100000 000250 WCKER: BIT sgIT1S, SRERLCRO) 5 SEE IF gpck’ SET ALSO 
76 J LINE1 :PR 1 OF ERROR MESSAGE 
issn iy ST i 
ae SER a BRIN NT L EINe 2 OF MK ron MESSAGE 
Boaaae 0 TSR pC, LINES iPR Nt tite 5 OF ERROR MESSAGE 
ite eauIt J5R Pe’T INES PRINT the 5 oF ERROR NEeeace 
24 ae. JSR PC, INCTOT jINCREMENT TOTAL ERROR COUNT 
be SE BER BE Wem 
as pe ne a 
021654 1S ISR PC ,LINEGD iPRINT LINE th SSAGE 
020060 25 JSR PC, SPOTCK : F Process T ON THE PACK 
BR 118 aT IF AT BAD SPOT ON PACK 
PARIS 10126 MOV BERGEN I3S tPSSUME THAT ERe2 WILL BE PRINTED 
O30 000244 BIT #81714, SRMCS2(RO} 5010 Heke ALSO ? 
01 047357 9010126 MOV #£N37, 13S : FOR "DCK’ OMD "WCK’ NOY DURING 








NOb 
MD-11-DZRM@ AO/O0, RMOZ PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 78 : SEQ 0077 
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S258 BiBtS8 Sonar te ia ETAT LING c OF ERROR TES 
101 020242 ISR ;PRINT LINE @ OF ERROR MESSAGE 
Bibi anata betse0 $28 < Rte IPR LINE @ § ta 
O18 Bare vetted 000250 art Ps TL aS 
101 I Q FINISH PROCESSING ree ERROR 
att Me 001350 3: MOV s oe. ;RETRY IMIT - 16 (10) 
101 161 4g: ISR IV : 
i 1 16 cs: TST STATUS(RO) ; ORDER FINISHED ? 
ce ee 
1 1 001351 INCB  RETRY+ + RETRY COUNT 
i es 021646 JSR PC,LI sPRI LIN 6C OF R MESSAGE 
10214 1 001351 6S: Pca aeTRY+ +1 SACRE RENT RETRY 
rl init 001350 001351 cree i ,RETRY+1 Eee ar ae : 
t 100000 000250 BIT IT1S,SRMERI(ROS ;’DCK’ ee 
t 000100 00250 Be . aay aeetaienl™ ea aS ‘pale 
1 La? BNE 4§ BR’ IF IT ORDER 
1 021646 ISR PC, LINEBC >PRINT L OF ERROR MESSAGE 
1 BR *FINI ING ERROR 
i 022176 7S: ISR PC, LINES sPRI a I ERROR ’ 
1 24 QS: JSR PC, INCTOT :I AL COUNT 
i 1730 JSR PC LINE? sEINISH THE ERROR 
ie 24 9S: JSR PC, INCTOT SE NCREMENT TOTAL ERROR COUNT 
1 021730 i0$: JSR PC; LINE7 *FINISH THE 
1 006136 JSR PC, REFMT *REFORMAT THE SECTOR IN ERROR 
1031 118: RTS PC * RETURN 
REPORT ’HCRC’ ERROR 
HCRCER: SEE IF ERROR AT PACK BAD SPOT 


AIALAtAtAtA 
ATAT Vit 
' VY: 
* “4 
a 
& — 
ais 
42 7 
: 
_ 
E 3 


wee | 
eee 
ae 
giaTas 
a8 


ag 8 


, pea 
3 4 


Bs Bere Ba Paes Gn bn Be Po hn ee ee 
* at 
Dai 


gaa 
35 





OTOH OFUT BE o— 
fale ele ee ee ele ele lee ee lee =) fale lela eles = ele es ee | 





JSR pC LI PRINT LINE ¢ OF ERROR 
Bett PRINT tf j ERROR 
S 021510 ISR PC’ LINESA PRINT THE HEADER INFORMATION 
040000 o70244 BIT sBiTi4,SRMCS2(RO) ;'WCE’ ERROR 
1037¢ 410 isk POLI EBISPLAY. HORDS WHICH CAUSED *WCE” 
1037¢ 1s JSR Pe TNCSOF sTeRERENT ’ 
1040¢ 023424 JSR PC’ INCTOT *INCREMENT TOTAL ERROR COUNT 
1 sett ERROR 
#3, 
PC, 
2s 
PC 


RETRY NOT SUCESSFUL 
;PRINT LINE 6C OF ERROR MESSAGE 


£ 
4 
S 


Loe Rina PERFORMANCE EXERCISER RACYIL 30(1046) BO? 08:07 PRE 79 











oo 
ee 
8 
_ 
= 
8 
— 


3 
ie 


BIT 
BEQ 


a 


DUAL 


PC, LINE7 


on 
si 


;REPORT DRIVE ERROR 


we Pie cot oa 


: 10804 021730 re Pesiine? Fin ine TF ERROR ReSoAGE 

405 ;PROCESS FORMAT (°FER’) ERROR 

4063 04 32760 CKFMT: BIT a »SRRERLCRD) rte ORIGINAL ERROR ? 
N73 is: JR ie TRACK & SECTOR ADDRSSES 
i 132737 BIT re Secuimehl ofHEN HEADER READ: 

a i B5e 047% 2: e ef TCK Ea Bro nen 
10560 00473? Oe 8a LINE1 SPRINT LINE 1 OF ERROR MESSAGE 

a tien (gon Ba Ge eRe eg pero 

oF tee Bee ey fetes imi OS a. Been se 

re iat E 5 tele 

4080 O10514 904737 as, a PGoLINES :DISPLAY WHICH CAUSED *WCE’ 

Se ties ee, en fy Ey ONS 

’ 

ae tite fee m stem | eRrN 

ae fies Sine: | Ie He 

Oss : JSR PC, LINE? sPRINT LINE ? OF ERROR MESSAGE 

1031 Givers 004737 21654 ys: JSR PC, LINED SPRINT LINE 6D OF ERROR MESSAGE 
10674 004737 021730 JSR PC, LINE? SPRINT LINE 7 OF ERROR MESSAGE 

Sa ER Be RMIT genre ent sci 

4 | ;PROCESS HEADER COMPARE (’HCE’) ERROR 

4038 010706 Q00400 000250 CKHCE: 


#8178,SRMERL(RO) ;HCRC SET ON ORIGINAL ERROR ? 
1$ ;BR IF NOT SET 





CO? 
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SEQ 0079 


eee 


Banta F 
Bint He $e 
ey sen ASO , 
— 


CRC _ ERROR 

CTOR & TRACK ADDRS 
1 OF ERROR MESSAGE 
OF ERROR MESSAGE 
ERROR SECTOR 


I 


“GeO ganar ressace 


PoRMAT MFG USER BITS FROM HEADER 
ONING ERROR 
MFG, 
LINE 6D OF ERROR MESSAGE 


eae 

gern 

voc ee T 
TORE , 


RETRY THE ORDER 
tite 
LINE 


weaceee Be Boe 
Beal gee a ot aa 
3 


a3 RRSP LPR E VIL ALL BLLL Se 


aac yepgeeen nOKR-SHNNEET AIOE 


ss 
6S: 


R Re 
ua 8B 


LE 


ROPER CREEK Kee Su tenuaeuR Sesa Sake 


A a dd a a ad a a Hd ed Od Od a OG ad 
th NY Geet patatatatatapatatapatatatatatapaatatatatatatatatetatetetetetotetetatsy 
SQOOO0O0000009000 00000000000 000000000 





cade ponbonhonton) Saar aan ae ae ae aa 
rrz7z72777 777 rrrrzrazz7z777777 777777 


;REPORT POSSIBLE POSI 


;PRINT LINE 7A OF ERROR MESSAGE 


;EXIT 


aoe 


SPSS SELES 


056150 


a 
SSS 


SRY PNREPERE 


Soe ee ee hem nee hem hem em) 

ert Ge ee he et 
td ht tt I 
Qo00O0000000 


;REPORT ’OPI’ ERROR 


Bee Re RE a SSSI RUN TMNR ERR NRE BRR BOS sels PPS PS RAR 


ee een oes D pra pom brn rn re rm ore bre rn ro rm rn bm brn rn nm re re ns 


rar7r7rz77777 


SE@ 0080 
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DO? 


PERFORMANCE EXERCISER MACY11 30( 1046) 
MAIN PROGRAM 


MD-11-DZRMB AO/O0 
DZRMBA.P11 aly 08:04 


a 


% 


LINE 1 OF ERROR MESSAGE 
ISH PROCESSING THE "DTE’ ERROR 


;PRINT LINE 1 OF ERROR MESSAGE 


5 
g 
: ee ee ts Ms & seas 
‘cae Ee epee aa 2 
so it Ee Sass See 
een el alee? Gant 
-& ion a. oS ~ : 


¥ Ce eS ae hee ogi Onde ct 

Wee ME Fk EM ee eg 
5 aS ly eg ere . Sere coe SE a - 
SEPP SIEM O ELOY 3 Seat 3 SUS SP SBGO MLO LOM e Sus sIey a] 
soomecoeoneoooe & sete § phssenecs nme. # plnmme Yoo 

& a = : a : 4g © : é : 

ae a 

6a 





So a ee 


SIS UGA SSG MM OSS MM 


hd ad od md ot od on Kee hee tem Kem | pa pk pM ph oD pd ph ok EK AR a ad a dt ot 
dd at ed at td tt tt a a meg ek dg nd Og eh a a te md ho td ot 
OO0000000000000 ooo00o OQOO0OOO00000000 Qo0go0o0o 


Sakouhonbonbonhonbon) cuhsnponjonhonhontonhontontonbeetonteshendec! Salsebonhoulontonhoahonton! 
rr7r7777 rr7r777777 rrrzrz7z7z77z7777 


4210 O11464 004737 020176 
4211 611470 104414 047326 


RA See BSE SS FORE CRE CER EE Sa R RE ES RE RAAT VS RS ous 


4209 


SEQ 0081 


EQ? 


a a Oe Le — oe MACY11 30(1046) 27-JUL-77 08:07 PAGE 


;PRINT Le ee ERROR MESSAGE 
LINE ? OF ERROR MESSAGE 


iP 
;RE 


UMTMNwr 
ed te 


esos 


;REPORT FORMAT ERROR 


: 


NT_L OF ERROR MESSAGE 
i FORMAT: ERROR 
OF 
OF 


;PRI 


SINS — - 


renihkinnhtanntut 


(on hem nee ben bee hee hen ken hen hen hen hen! 
en 8 ng Oe OG ed a hd od 
OO00O0O0000000 


§ OF Ennon nessace 
ERROR MESSAGE 


4 


3 PRINT Lie 1 OF po MESSAGE 


BR’ IF 
OI 
PR 

I 

PRI 


j 


aa 
;PRINT LIN 
RE ORM THE 
t RETURN 


;PROCESS CONTROL/INTERFACE TRANSFER ERROR 


;PRI 


4, SRMCS2(RO 


PEKS? 
Pc, 
PC, 
PC’LINE4 
eptTi 
1$ 

PC 

PC 

PC 

PC 

PC 

PC 


sioee 
— 


Bact rien heehee 


i ome em hem am hee ene heme em hem hen hen kom hem) 
on bam bam ban hen bas ben ben ben bem bam bam band 
OOOO OO0000000 


"MDPE’ SET ? 


un 


¥u 
pir lls 
eget a 


Sg 355 E- an 
Ere = = 
ESEEERSGUCRWE CEE 
S 
° 
w Bees & q wy 
a eerie ee a a3 


soo so ot 


021646 


aes Tt 3 


motel : 


SIG SRRR RRR eRe 


dd kd ad ad nd ed od od 
SoooDDoDODOOOOOOoCoOOO 
oQo00o 





PPT VTS ENE PSU NUNS ESSE V ORG e REE CU NE OURNEOE ONE REES 


FO? 





Buel to Le 
Le i ae 4 a Gs zo a, 
hee ce 
: oe a el. bl eet wee 
ee a : = eS 
~ ERREREE - Hecate 2 EEGs _ caters’ 
af 3 : 
4 GBUEKE Sg os: :% Brae 6 ook 
2. Pee Tea 
5 g eeesiie g eheeeseveniders ; Super GAe Ney : Palen 
= > > > 
af Fe sSossnse | sPomonrnanen. SENDER aMADOE 5 Ryokan 
4 is Fé 4% - bos BE 
: 
: 
: é eavgtaR GR Og LANE 
ee Sues! gas 8 ae 


Su 


— 2 eiseaeced | ESREGne 


j 
+} 
a 
Goug0Go0 Seu See ees COSGESGSCHoooD patavavavatatay=) 





 SESSSSRSSSSSR STD MDERTRUEDUER SESE EE osssssssssaIee 


MD-11-O0ZRMB AD/00 
DZRMBA.P11 


GO? 


SE@ 0083 
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MAIN PROGRAM 


-77 08:04 


os 


rt fo 


Pil 


MO-11-DZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 


2 

7: 

; . we 8 ig 
, Bi i) ba 

5: eae ae Bp -* 
fh. PRE OES ee 
see eee eee § oi SoS EE Satter 
eeEPERERI: ap = 
ieee pee snes 


z. ahaha» oe 
eae Be BAe rea ee ey 
i 


sihastantentenbanhapbeaPcountPan 


;CHECK ERROR BITS IN THE RH11 & RMO3 REGISTERS 
| lee 
SRMER1 (RO) 
$ANER2‘RO) 
LINE 
LINE2 
LINES 
LINEY 
INCTO 
LI 


a 8 
Zise Of 
SuERREEE GEER Hite 


SOU OS CT STS TOTES Mee 
ONERUURACSRSNERRACRRNRETT IDs EEREIRATERACGI 


ae Ht ESSE SESS SSS PT A Tee Ramee en Teaee teaun ones Knee Inoue Renee Ines, Inca inane in nates} 
2QO0009OO0000000000000000000000000000000 QOO0OO00000000000 


SM SEMEN Se AUN UME REET SS SSS 


rTrrrsrzr77z77IF7F7F 777 777779797957 7777777797777 77797 7F7F77F777FF 





MO-11-DZRNG A000, RMD PERFORMANCE EXERCISER NACYi1 30(1OMG) 27-JUL-77 08:07 PAGE 8S 
DZRMBA PII oyesu 7? 08: 04 HAIN PROGRAM —_ co 


4380 012530 000207 2s: RTS PC ; RETURN 
4382 ;CHECK BUS ADDRESS REGISTER & WORD COUNT REGISTER 
i CKBUS: TST SRMWC(RO) 
d bee OO ioe fF Ror ROT ZERO 
MOV SOLA), -(SP) WORD N 
ABS SBUF CRO), (SP) he tial Atos! LOcaT fon 
cH (SP)+, SRMBA(RO) ; s BUFFER QOORESS 
Q IF OK 
1S: JSR PC, LINE “PRINT LINE 1 OF ERROR MESSAGE 
DISPLY 1 : COUNT INCORRECT 
ISR ,LINE2 PRINT LI MESSAGE 
JSR PC, LINESD PRINT LINE 30 OF ERROR MESSAGE 
JSR PC;LINEY SPRINT LINE 4 OF ERROR 
JSR PC? INCTOT :T TOTAL ERROR COUNT 
re J5R PC, LINE? ‘PRINT LINE 7 OF ERROR MESSAGE 





ener retrrrr eect ct 





12616 132760 OO0004 O00024 CMPAR: BITB  sBITO2,SCODE(RO) ;SEE IF READ ORDER 
1 100 BNE 1 ;BR IF IT IS 
1 ries, RTS PC * RETURN 
Ot CLR FRSTER ; CLERR ’FIRST ERROR’ INDICATOR 
1 BIT #SWO1, 2SWR iIS Ts sures 1 SET? 
Ole642 001401 BEQ 1$ oR NOT 
01 RTS PC : DON’ T 
" SY Birla i 
4411 Ol t MOV SEHD. CRO) GHCNT 7 WORKING LOCATION 
4412 Ol ADD SRMWC (RO): CMCNT WORDS TRANSFERED 
4413 Ol MOV SCY (RO) City WORK TRG LOCATION 
mie Gere H? Hitch, i 
44) ot 4 SrEnae MOV $SEC( 1 ecec ez tee vero USER BITS TO WORKING LOCNS 
4417 Ol 01 00 MOV CMPLMT,LIMIT  ;DISPLAY LIMIT 
441 d INC LIMIT : INTO LIMIT VALUE 
4419 O1 1 i 001374 CMSTR: MOV $-1, ZROIND THE ’ZERO’S’ INDICATOR 
wed Lerae 901400 CLR SAVER CLEAR THE R1 SAVE WORD 
aus i 53760 ath ooo022 CHP Sach AT SSSEC(RO) Pia FrER re 3 ERESTER THAN ONE SECTOR ? 
44 1 1 1410 MOV CMCNT, R2 ‘LESS THAN, USE REMAINING BUFFER 
“i i 605037 1410 CLR CENT SET COUNTER TO 
wig? 1 016006 1s MOV $SSEC(RO) ,R2 to CTOR 
1 1 001410 SUB SSSEC(RO);CMCNT ;DE WORD COUNT 
“ 1 Of 1 000005 2S: CMPB SCODE (RO), #5 > READ HEADER & DATA? 
“4 13016 : 001412 CMHED: oP cnr , (RL)+ Bet Or CYLINDER 
4433 013024 004737 0130S2 JSR PC, CMSTR2 sREPORT ERROR 
4434 013030 023721 001414 1S: CMP CMSEC, (R1)+ comer’ SECTOR & TRACK 
4435 013034 001402 BEQ 4§ -BR IF EQ 


MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 86 SEQ 0085S 
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; . ERROR 
8 46: ai S _ SUBTRACT HEADER LENGTH FROM SIZE 
CMPRX :BR IF FINI 
T H TA ION 
CMSTR2: INC TR : COUNT 
JSR BC, CHPRT *REPORT THE SON ERROR 
RTS i Ce THE OF HEADER 
CMDAT: JSR BC, MATCH if THe 
ISR PC, NOMTCH : F NO MATCH WITH PATTERN MADE 


;BYPASS 
2s: MOV (R4) RS ; PA IN R4 
MOV #20,R3 RO TS BATTERN COUNTER 
3S: CMP (R1S+, (RS)+ ; COMPARE BUFFER WITH PATTERN 
a ? 


Po ERCTR i Phoes 


SSSSL ORG SERPR OB ORD DDRORSSSAREERs EaEeR 





eo = E BannSates BP 
BEQ ug’ :BR PA oT eer 
ISR PC, CMPRT :DI 
4S: DEC R2 3 COUNT 
BLE 8$ ; 
DEC R3 : POS 
BNE 3$ “BR IF NOT AT END OF PATT 
BR 2s : PATTERN 
SS: TST sg¢RL) : uy CHARACTER=0 
001374 MOV #-1, ZROIND *SET NON- “ INDCATOR 
INC ERCTR Fic THE COUNTER 
JSR PC, CMPRT : 
6S: Fora TER ‘Fons ? 
def BMI BR I 
2 CLR IND SET THE INDICATOR 
R1, SAVERI : Ri 
pa —— S RONTINUC CORPOR 
4473 7$ TST ZROIND “ANY MISCOMPARIONS NOT ZEROS ? 
male | BEQ us 7 *BR IF NONE-ALL ERRORS= 
44 BR ug’ : UE COMPARING 
aa 000004 8s CHP CMCNT, #4 LAST SWORDS ? 
oa oo000s ches SLODE (ROD, 45 ?READ HEAD AND DATA ? 
1 13S: MOV CMCNT , R2 ig COUNTER = REMAIN BUFFER LENGTH 
mas J CMP R2, #4 : WORDS ? 
BLT CMPRX : YE T 
nt 001410 SUB 8256. , CMCNT CREA THAN A SECTOR ? 
BLE CMDAT NO, RETURN TO 
ides MOV #256. ,R2 *SEt COUNTER =SECTOR SIZE 
44 BR CMDAT RETURN TO 
4488 QS: INCB  CMSEC 3 
iuge 000040 CHB CHSEC, #32. ;MAX SECTOR # ? 
4491 CLRB  CMSEC “RESET SECTOR # 





JO? 


SEQ 0086 


27-JUL-77 08:07 PAGE 87 


MAIN PROGRAM 


ORMANCE EXERCISER MACY11 30(1046) 


: 


ay 


T ERROR AND PROCESSING ’DCK’ ERROR 


SS 


iinet at be — 
He — eee ee 


Feeee Monee SSESe 


;RETURN TO COMPARE LOOP 
;PRINT LAST LINE IF ERRORS 


; 

3 

3 

; 

, #150000+822. 

i] 

YL, (R1)+ : 
: 

(RD ; 

y 

’ 

g 


aque oe 
GB ee etre sgn Ege 
sfaces a Bend ISS gIAIy 


rylehGe BRBERRSGSERe wR tn 


cael S ge 
Sees ee aaa et 


se 
— 


SR 
JSR 
ae 


; TYPE DATA COMPARE ERRORS 


118: 


ratyt ooo00s 
OOi4ie 151466 
ate 001410 128: 


001412 


cam Gay ge ceeee aes 


re 
S8ssss cs § Bees 


wth 
oe oy SEE 
SUA ESN er MMS Lea veetente eeisegerrr esi 


pha tattle ATT ot hh ag hh nd dk a a ht tt 
OQOO0O000000000000 oo OOOO OO0OOWOOOBOHOOOOOO0000000370000 


FEEETEE FUSED SUN RD RED SLEPT RE DITIT TOR STS pUR OT OUTED SDE eS 


00141 


? 


. 

a] 
nw 
tee 


ee 


st be ob bs eh bb 2 Po he ee be 


svsnonssoRs 


GfEASSAISS ESSER ARE SRA OR SA NEAS EA NeagenoeneNaRNaRENINNSS F 


pot BE Bes be ee Es fe be 


seseee eS 


oB,cce 


8 
z 


ees 
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: T . 
001406 ge: a Pe MIT iE peur LIMIT REACHED ? 
BEQ 9$ iB T WS 
001406 DEC LIMIT : MIT COUNTER 
BNE 10$ *BR IF NOT AT LIMIT 
000200 165326 9S BIT #SWO7, ISWR : PRINT PLL DATA COMPARE ERRORS ? 
BNE 10S BR I 
RTS PC : 
10$: MOV R1,-(SP) : ADDRESS 
SUB #2; (SP) :ADJUST ADDRESS 
deee10 JSR PC‘ LINOCT it IT 
16 DISPLY ,LINSP 
177776 MOV ~3(RS) ,-(SP) but GOOD DATA ON THE STACK 
122210 JSR PC. LINOCT TYPE IT 
052716 DISPLY ,LINSP *2 SPACES 
177776 MOV ~2(R1),-(SP)  ;BAD DATA 
022210 JSR PC. LINOCT TYPE IT 
001201 DISPLY SCRLF > CR-LF 
S PC * RETURN 
sLAST LINE OF COMPARE ERROR REPORTING 
001377 ENDCMP: TSTB = FRSTER+1 ANY COMPARE ERRORS FOUND ? 
BEQ 25 (BR IF NOT 
001404 TST ERCTR SEE HOW 
BEQ is ;BR IF ONLY CAN’T MATCH PATTERN 
DISPLY ,LINSE OF =’ 
001404 MOV ERCTR, -(SP) : OF 
022242 ISR PC. LINDEC ; TYPE _IT 
001201 DISPLY ,SCRLF : 
023424 1S: JSR PC, INCTOT ‘I TOTAL ERROR COUNT 
021730 JSR PC; LINE? jPRINT LINE 7 OF ERROR MESSAGE 
2s: RTS PC * RETURN 
; ROUTINE TO MATCH THE DATA WITH A PATTERN 
MOV #BUFFER,R1 ;BUFFER ADDRESS 
; ISR PC, MATCH 
; RETURNI ;PATTERN ADDRESS IN R4 
: RETURNe :COULDN’T MATCH PATTERN 
MATCH: MOV R1,-(SP) : Ril ON THE STACK 
000044 i HOV a Re 1a el INDEX 
ay Ba s2,R :DECREPENT 100% T MATCH 
002476 MOV oF NDAT(RY) ,RS Mokess'9 OF BAY TERN ADDRESS 
000004 MOV #4.R3 ; NUMBER OCATIONS TO CHECK 
25 CMP (R1)+, (RS)+ C0 R AGAINST pitt PATTERN 
BNE it ia uA QUA TRY NEXT PATTERN 
Be t«S Ayaka: toHED 
002476 800 SSTNOAT, R4 NAKE TTERN ADORESS ABSOLUTE 
oo0002 o00002 3$ ADD #2,2(SP) RL ew RETURN ADDRESS 








SE@ 0088 


T R1 


LO? 
27-JUL-77 08:07 PAGE 89 
Ri 


(SP)+ 
PC 


RYs 
;USE ECC TO CORRECT THE DATA ERROR 


BP gO Sp SESS ONL we SOCOM 
$2 BNR ee 


MD-11 


) BACK IN 
NTER 


ELD SIZE (IN BYTES) 


INTO NEXT WORD ? 


HEAD & DATA 
(IN 
Hee 
A LOCATION 
By OFF Se! COUNT 
"count 
COUNT 
GINS AT 
a 
COUNT 
OF 
ING 
WAS 
READ 
MASK 
MASK WORD 
*DUPLICATE ADDRESS 


oT 


pA SECTOR XFERED ? 
NO 
asf 
te 
THE 
1 
eae 
a 
Sars, 
IF IT I 


CONTI 
SAVE. THE 
BUTT 
CLEAR 
CLEAR 
SET 

DOES BURS 
BR 


oo 
=z _ rare 
On & eS aegis 


nil 
BR I 
ap 
ADD 
ip 
- 
Loe 

; CLEAR 
= 
convent 


i Revol sero bees pe 
cas & 7" st lee 2 bt 

coq Sw & age SS Sy Senay ; 
: OB stunthnSuna netic Bsesoss aa owes EES ee aeeeaeon 


Febuary a reer senahenooleese SS oPeeesEsdesase we 


9 ee ef ee ee 
YY) “4 % 4 

wo vs] wo 
g ES @§ § 2 gle ae f Ss f£ 
— — 3 3 watt et 33 od — R 
3 8 sss 8 s 3 


cj 5 See ca ame me ee 
Pe ae 


or 
G5 2F SUMSUEE cmas sunRogmaNeNES: ReRAUETgUENCR ANNE Tey 
rarrarz77a77777 77777 rT rrrrrIrIaITITIIITT 


4 AA AAAAA AKA AR ARR A AR KRARA RRR RRA RR RR RA ARR RK RRS 
09000 OOOO0000000000000000000000: ONOO000000O0 


J9FDSS PPD ESIE TITS ST TEST IET BETES DE aEE SESE TITIES TES 








: 
& 
3 
: 


- 
8 


Siete 


eb ee — 


3 


eegtgeeeits 3 


“ 


PN 


FRER 


EEE 


= 
2 


RORRERSS SS 


OOOOOO0O000000 


hs b= pops he 


a 


SESS SLLLLCRELERRRRRE 
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Cre 


: cele 


suey 


batty 
o- 


Bm See 


SEQ 0089 


SERB counos TENT BB PRE Burren 
; WORD ADDRESS 


CWRD1 ; 
;PRINT CORRECTED 


SE CMRO1, ECBA01 i SAVE THE SECOND BAD WORD ts 
sero! ) LI deren BITS FROM UPPER MASK 


ECMSK1. ONE BITS FROM DATA WORD 
(SF) + SECHRDL Bt fs 

3 ={SP) PUT ECWRD ON THE STACK . 

PCL Tho ; TYPE _ECWRD 

ECBADO, - (SP) :PUT_ECReD9 ON THE STACK 

LINsP OP AEES 

QECWRD.-(SP)  ;PUT SECWRD ON THE STACK 

PC LINOCT ; TYPE_ SE CWRD 

ECHROL > PRI THe NEXT WORD ? 

SCALE PRUF 

ECWRD1.-(SP) | ;PUT ECWRD1 ON THE STACK 

PC LINOCT ; TYPE ECHRD! 

ECBAD! -(SP) ‘PUT ECBADI ON THE STACK 

PC LINOcT ; TYPE _ECBAD1 

SECWRDI1,-(SP) PUT SECWRD1 ON THE STACK 

PC LINOCT j TYPE GECHRDI 

ECC tte 

,LINLOC ERROR BURST WAS NOT TRANSFERED TO MEMORY 
SCRLF *CR-LF 

PC * RETURN 


;ROUTINE TO DISPLAY THE SECTOR WHICH GAVE THE HARD ERROR 
PRTBAD: BIT 


#SW3, ISWR ; PRINT THe BAD SECTOR ? 
SRMBA(RO),RI ss; END ADDRESS INTO R1 
SWROL(RO),-(SP) ;FINO THE BEGINNING OF THE SECTOR 
SRMWC(RO), (SP) ;SUBTRACT NOT 
-(SP) : DIVIDEND 0 
SSSEC(RO),-(SP) °:DIVDE WORDS TRANSFERED BY THE SECTOR SIZE 
ep Moy Roe 0? 

o Ss ‘ 
15 *BR IF IT IS - CTOR TRANSFERED 
(SP) : RESIDUE SECTOR SIZE INTO BYTE COUNT 
(SP), RI :SUBTRACT IT FROM THE END ADDRESS 
2s *FINISH SIZING : 
$1000,R1 : SUBTRACT SECTOR IZE FROM END ADOR 
SCODE(RO),#S  § ;WAS OPERATION & DATA ? 
2s ;8R_IF NOT 
#4,R1 :SUBTRACK HEADER SIZE FROM ADDR 





3 
; 
: 
3 


x 


i] 
rs 


De Fa pes ms tes Be Bn Dan Dee bea Go Be be Eh i 
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bebe 
no 


SECLELSCLCLOLES 
$335 


cf 


SESE CC LCS 


RIERA SUE EERE be 
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SEELCSCSCLSESS CSCC 
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MAIN PROGRAM 


08:04 
: 84 POINTER 
nesadl ™ Bt SPL y tia 1H BRENT the Tenock 
000007 3S: MOV 87,Re Re Porites WORDS/LINE COUNT 
MOV R1,-(SP) ON THE STACK 
ried us: Ge  pY’RARBREROD im SECTOR ? 
. BEQ ss’ PRINTED ALL Ties 
052716 DISPLY L INSP : 
tR1)+.-(SP) ft DATA ON THE STACK 
022210 JSR PC, LINOCT ; T 
DEC Re THE HORIZONTAL COUNT 
BNE 4 IF NOT AT THE END OF THE LINE 
001201 DISPLY ,SCRLF 
; fn ORE THE WORDS/LINE COUNT 
001201 cs: DISPLY ,S$CRLF ‘PRINT WHAT REMAINS IN THE BUFFER 
6S: RTS Pc ? RETURN 
; ROUTINE TO DO AN RTC - DRIVE SELECTED IN RO 
S ] 
MOV DPB ADDRESS 
: JSR Pe RINCTR 
: RETURN 
045532 RTNCTR: MOVB = (RO), GENDPB “MOVE THE. DRIVE # TO THE GENERAL DPB 
000117 o4sS34 MOVB = SRTC GENDPB+SCOMND COMMAND CODE 
035040 1S: JSR RO, RMOS “RIVER ENTR 
GENOPB :OPB Sontee TOR FOR ORDER 
BR 1S ; DRIVER DIDN’T ACCEPT ORDER 
RTS PC * RETURN 
3 ROUTINE TO DO A RECALIBRATE - DRIVE SELECTED IN RO 


#0PB, RO ;D0PB ADDRESS 


; 
ST] 
; 
: OR 
; 
; 
5 


MOVB § SORIVE. GENDPB t DREVE ADORESS 
JSR PC, RECALTO 
RETURN 
045532 RECALT: MOVB = (RO) .GENDPB -MOVE THE DRI s To THE GENERAL pe 
000107 o45534 RECALO: HOVE —a<;- jRELCALIBR COMMAND 
. - 4 


BE BR IF Mor NP INTSHED 
RTS PC RE URN 


ser pet THE DRIVE IN RO (OFFSET CODE PRELOADED INTO ’RMOF’) 


eee’ MOVE ROFFSET,GENDPB+SFNT ; OFFSET CODE 
MOV 80PB, RO ;DP8 ADDRESS 


B08 
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SEQ 0091 


sp GESEESERRSSREDSE ERC ER EREREE Sogpeyeaee 





1$ 


PC 


UTILITY READ HEADER ROUTINE 


CALL: 





ADJUST RETRUN POINTER 
RETRY 


ae. 


) 


SSEETOR,-(5P) 
aCYLINOER 
PC READOR 


»~(SP) ; 


¢ biSeerS i, 
say smaiead 
in 
ce! | 


Coe 
ere GSNZRUGH 


LALRLALNLInNininin 
dd td td 


;RETRY THE PRESENT OPERATION 


1S: 


DIFFERENT ERROR OCCURS DURING 


ROUT 


INE EXITS TO ’ERPRC1’ 


ORDER 
PUSED? 
ERROR 
; INCREMENT RETRY COUNT 
jDID ORDER TERMINATE NORMALLY ? 


BR 
i 


STATUS(RO)’ 
; 
£ 
’ 
’ 


TRY+1 
, (SP) 
#8117, 


ehenuueae 


w 


co 
93 POOREST 


oapepeesessaeseses 


? 


— 
a 

-_ 
-_— 


es bs be hos Poe he Se Pe ee 


BREESS SSS SASSER ORR RR PEAR DNB sate dren aoe tRNeORO RNS 
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; 00134 000250 3s Bir RAK, SRMERL RO) all 
HH ABIES cos: “* BSB Herm ibe eT OO 
1 i fe IF NOT DONE 
022176 6S: J PC, »LINEB : { DIFFERENT ERROR 
ieee 13! ss cy ie 7 POINTER FOR DIRECT RETURN 
414 052103 78: DISPLY sane i: ERROR DURING RETRY’ 


— TO UPDATE THE PERFORMANCE SUMMARY STATISTICS 





: HOV «OP RO :DPB ADDRESS 
: JSR PC, StaTIs 
. RETURN 
015262 032760 000300 0000:5 STATIS: BIT 881T07!BIT06,STATUS(RO) ;CHECK FOR DATA TERMINATION 
ee He gece gue Sl RPP ANG alee TRC eh se 
ot x 015416 SUB (RO), eheton ; T THe INRTIAL ADDRESS 
15306 001431 BEQ IF NO DATA 
015319 006237 siete ASR FACTOR Roi eR CONVERT TO A WORD COUNT 
HIS fers flue moe esol et co 
1 1 Cooode oooce4 BITB  sBITO1,SCODE(RO)’ Ir ORDER READ 70 WRITE 
bee nt o0oc24 000001 ee Stove (RO), #1 es eat A AUTOMATIC WRITE CHECK ? 
1 gocse0 000046 ADD: SWROL (RO), STRAP greens) ;ADD WORDS WRITTEN 
1 ADC 8 (RO) CARRY 
1 015416 oo00s2 1S: ADD FACTOR, $READ(RO)’ MT PDATE READ WORD COUNT 
15366 000054 ADC SREAD+? (RO) CARRY 
15376 6060 oo000i2 oone70 2s: CH SCYL (40) ), Seroc Rb) 2, ee MID-TRANSFER SEEK OCCUR 
1 52760 000001 oco0n42 ADD #1, SPOSIT(RO) SOACRENENT SEEK COUNT 
pteits bbeeen Sooo @bc -« $POSIT#+2(RO) {ADD CARRY TO UPPER WORD 
015414 000207 3S: RTS PC 
015416 000000 FACTOR: .WORD 0 ;USED FOR WORDS TRANSFERED 
; ROUT INE TO GET A SUFFER 
: MOV #0PB, RO DPB 
: CLR -(SP} SOP EAR THE STACK 
: JSR PC, GETELIF 
: RETURN BUFFER ADDRESS WILL BE ON THE STACK 
: STACK WILL BE ZERO IF NO BUFFER AVAILABLE 
015420 010146 GETBUF: MOV R1,-(SP) -SAVE R1 
015422 010246 MOV Re, -(SP) SAVE Re 
O1sHe4 010346 MOV R3,-(5P) : SAVE 
15426 013702 001700 MOV BUF TBL , Re :NUMBER OF SEPARATE BUFFERS 
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al 


e7- 


date one 


IF NOT AT END OF TABLE 


AVA 
ae 
IF t I 
epee 
Ply sic 
HL 
% 
DECREMENT TABLE COUNT 


rex 
S> bapeeer bu. 
watt Maton -= ae 
ae nen aSebee 
= = 5 t2 
a ee 


fee e8 55s eugcee SG amibiby 
SaeIUTsnb Mr siataugeeaauvSaae 


s  & $ & ¢ 


a Gees & 


Seuoesineeto es 
_ Rei eeeecmmemnama em 


OE ee ed cath ed eh md ed ed a ed hd a Ed et te 
2000900000 000000000 00000000000 


—_ 
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geo fl 
2 Gey 
on 3 
. 3: 


;0PB ADDRESS 
Ri 
Re 
RY 


g 5 SannHGRESeSERASeTEE 
- 2 ® a 
Sy eee Be 

es Sohbe; © oe 8 
| LE La. 
= 
7 2 SESS SSH ETSRETESEEE 
ag : 

e868 E Es 


a ts 


ee ham pam Kam ban base ben Doan ben ben bem bem ban bam bam ban ban bem bam 
OOOO 000000000000 


2} POTTER 


E08 


SE@ 0094 
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. 

Hed eo Ab oes - : 

Ate! plot 

oa 2 Ss tg g : : 2 § ff 
24ee oe + ee 
247°. eee 
Se Gere veeeiim, § Lee ya 
eo ee ee 

2 

x  - ge ES et 
. eS xu = ++ ~ -¥8 ¢~Se 
; we en BS ce REE E sort S ies oes 

na abd 8 Bp oehthey ee, ptritr., g adie Sete eraes iis 
adie DOBSBSGSRGSUED,BORESEEEVEDESE ; setae SSUEESGBSSES 


AR ah 
BES i. a 


segs Ee 
a - 


= Sn pan emn dem pam pena ann pam em em pam bean, bam pam been am, here tome homeo hoe free hoe ee te ee ee ee ee ee ee ee) at et td wt I I I I I 
OO00OO0000o0 QONO900O0000000 QQO000000000O 


EEPELEEL ELV EU UUM ODE Pa REyy Tp Epp eo eon Tene ReTReTTEET ES 
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SE@ 0095 


REGISTERS 


( 


PATTERN INTO THE BUFFER 


rk 
tea 
REST 


THE WORD COUNT 
SCONTINUE DISTRIBUTING THE PATTERN 


hak 
(RID 


=. a. 
ez act. 


oap 
¢ 


“8 $ 





a 


HSSSNZNAR 


wowWowvowonwowo 
ce) Pibeckeherereee 
a OOOG00000000000 


gS bE iit cities 
=; t=f= at at tt ad 
Wainintintintatata ttre 


tte oe ee Els vee 


;DRIVER REJECTED REQUEST 


STRRRCRENT-CTHE OPERATION COUNT 


START THE ORDER FOR THE DPB IN RO 
* HOY wre ney ;DPB ADDRESS 





hd Oh 
OOOO O00000000 


VALUE 


READ OR WRITE 


Bi ate ow 
haa 

- oe 

Aan ia 


SELECTION DIVISOR 


;CYCLE THE RANDOM NUMBER GENERATOR 


;0PB ADDRESS 


We Gis Sets 


BeSsves Py S.J 


tis shabeee 


es 
— 


;GENERATE PARAMETERS FOR THE OPERATION 


¥ 
ee ee ee 
QOQOO0O00OO00000000 


oOo cao eM a aR RRR 
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Sac iat 


Ey men sRESET CYL 


nee 001425 BEQ 


i 





ae 
8 
nf 


oo 
bb bh ee 


8 


;GENERATE A RANDOM SECTOR ADDRESS BETWEEN VALUES ’MINSEC’ & ’MAXSEC’ 


016350 000116 RANSEC: MOV MAXSEC(RO),RS © ;GET MAXIMUM SECTOR ADDRESS 
16354 000120 CMP MINSEC(RO),RS ;°MINSEC’ AND 'MAXSEC’ THE SAME ? 
1 BEQ 23 BRIE I ARE 
1 SUB MINSEC(RO),RS ; T MINIMUM SECTOR ADDRESS 
1 BPI. 1S * :BR IF MAX THAN MIN 
iers —s 1S ane ae 7 : IPPERERCE TO USE AS DIVISOR 
1 027304 ISR PC GETREN oo GET THE RANDOM AUGMENT 
Hs ants oe 2s’ i iis vs NOT 2 
16414 000040 SUB 832. ,RS * CORRE! 
016420 000076 2s: MOVE RS,SMSEC(RO) = ;STORE SECTOR ADDRESS IN DPB 


TRACK ADDRESS BETWEEN VALUES ’MINTRK’ & *MAXTRK’ 


[ 
; 


EVER FERRER CII ULI Li RBRESPRSRE acs dea aa aatictin 


O1eHe4 000112 RANTRK: MOV MAXTRK(RO),RS § ;GET MAXIMUM TRACK 
14 OO? or ee a he ee 
1p 1 000114 SUB MINTRK(RO) ,RS i Brat pact MINIMUM TRACK 
ieaag oo000s nr a Ech THE MGR 
1eNee 027304 mm OR crn ‘ING Cia 
bts 000114 ADD MINTRK(RO),RS =; vARACK 
1 000004 CMP RS, #4 : TOO LARGE ? 
1bH66 101 BLOS 2 :BR IF NOT 
16470 1 000005 SUB #5. RS : CORRECT 
16474 110560 000077 2S: MOVB RS, SNTRK(RO) §§ ;STORE TRACK ADORESS IN DPB 
GENERATE A RANDOM CYLINDER ADDRESS BETWEEN VALUES ’MINCYL’ & ’MAXCYL’ 
016500 016037 000106 001446 MOV MAXCYL (RO), CYLIMT ASSUME AN 
1 000 106 RANCYL: MOV MAXCYL(RO);RS  ;GET MAXIMUM CYLINDER ADDRESS 
i + amen ob res er he ee ee 
2100 i Tees 000110 SUB HINCYL(RO) ,RS SU TR a8 MINIMUM YLINDER ADDRESS 
1 1 001446 ADD CYLIMT,RS : CORRECT r 
NB HER BD cm =| Bae, Pe en? = oT 
210 S16540 066005 9001.10 ADD NIACYL (RO) ,RS NEW CYL SS 
1 1 1446 CMP CYLIMT, RS 215 ? 
S107 016550 003002 BGT 2s :BR IF NOT 


SEQ 0097 
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Su 


ere 


Pll 


MD-11-DZRMB AO/00 


g.. © si * z a 

: eS nase - i dg 8 . 55 
SdmltSetl-:igit. i, 2 
apes joremilelm® Gt & = 
EP Rnih tweets Gitte el a 


ro} 


“, 6 Beets ® 
Hlacdocclinindnttvhertcat™ ot 


Souwib ei ahabehsbusraE ays 


(RO} 
(RO) 
;GENERATE A RANDOM BUFFER LENGTH BETWEEN 4 & THE VALUE IN ’MAXDL’ 
MOVB 
: MOV 
RTS 


RANSIZ 
SNCODE (ROS 
(RO) 
SNCODE ( 
NUMBER 
(RO) 
(RO) 
sROUTINE TO CHECK THE SELECTED ADDRESS IS NOT ON THE BAD SPOT 


4S 
;GET A 
RANPAT: JSR 


Ss £8 8 -_: : 
in ie te! 
SHIT EC MEIG S 
=e ies 





Ge E WERE 


BOLIVIA LE RANI RAVI BSE SYST PPS PT RAMA TR RES SYS 


Se ae Dern ae dean an bea bean eae ea pean ee heage, eae, bean hae eee, bene bee heme hem hae heme ram Frame Troms rome, Foam Tee Teen eee en ee ee ee ee ee ee ee ee ee pe ae pe ae ae ee ee ee ee ee ee ee ee ee 
ULLAL LA LALLN LALRLRL LALALD LOLNLN LALLA LA LALALA LO LALA LALA LALALOLOLOLO LOLOL LRN LNLNLnLninininin 
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: 
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a 
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a8 


1 onal chanel See eee oer ee ee ee 


dn SSEGERE 
OOOO OOOOO0O0O000000000 


Pt a bm Bp tp he 


3k | Skeanaeze 


ao 
p's 


SIVVYVVVVTC TSS. —— 


Rais 


H“BBBQRRIBRABIBIIaAatz 


Be ot Rs Pp ee pe 


NNNNN 
He pee 


OO000000 
S=zoRk8 


Os bo Bee bb b= Bb bP 0 bb 0 bb 


QUOT UU Un UU UU 
BIFRLS8 


3 
OOO OOO0O00000 
DO a epee be tee 
NNNNNNNNNNNS 
REFHSFHSLRRV 


HP - be Pet Ft P > fs bo Ho he 


thtathath tt th tt tH 
a ee 


WONT CWO 
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:04 MAIN 
R3, -(SP) ss T 
igs 000020 HOV #16. Ri iota 3 ea OF BAD SECTOR ADDRESSES 
MOV —- RO, RO ; TABLE AODRESS 
000124 ADD SSBDSEC, R2 : DBP + TABLE ADDRES OFFSET 
177777 1S: CMP #-1, (Re) : ENTRY ? 
a ane Bee 
l2 000100 CMP YL(RO),(R2) ON THE CYLINDER ? 
00101 BNE 2s “BRANCH IF NOT 
jeb0be 000011 000003 CMPB = STRK(RO),3(R2) ;0N THE TRACK ? 
tbe> 00010 oo0002 Bee SRECCRO).2(R2) TORTHE SAME SECTOR ? 
Obi00s BNE $3 : *BRANCH IF Sor 
oooo0e2 ADD #2,RS * OTHERWISE, TAKE ERROR EXIT 
ne Bee tC Ate 
x 2s: DEC 1 ALL 16 BAD SPOT CHECKED ? 
6270; aS OCS RO SODJUST TO NEXT TABLE ENTRY 
oooo004 “4 : 
BBSFe5 - Be is’ OOPS BACK 
1 : MOV (SP)+,R3 ;;POP STACK INTO R3 
1 MOV (SP)+)Re POP STACK INTO Re 
12601 MOV (SP)+/R1 *:POP STACK INTO Ri 
o0020s RTS RS > RETRUN 
ROUTINE TO SELECT A WRITE (OR WRITE HEAD AND DATA) OPERATION 
01 ooon02 RANWRT: MOV #2,RS :SET WRITE DATA COMMAND 
eed 001474 TST FORMAT ALLOW FORMAT OPERATION ? 
001406 BEQ 1§ :NO 
: oo0004% o00024 cHPe #4, SCODE (RO) ; PREVIOUS A READ DATA COMMAND ? 
12705 000003 MOV #3,RS ‘SET A WRITE HEAD AND DATA COMMAND 
410560 000074 1S: MOVB RS, SNCODE(RO) ; BELECT THE WRITE COMMAND 
RTS PC :EXI 
;ROUTINE TO SELECT A PATTERN 
GETPAT: MOV RS ;SELECT PATTERN 
Roeeae rotate TST pertER ‘ENABLE RANDOM PATTERN SELECTION ? 
001403 BEQ 2s : YES 
bag? 001510 HOV PATTEN, RS j USE INDEXED PATTERN 
027304 2 JSR 8 ce TREN “GET CODE 
TST RS :WAS PATTERN ZERO SELECTED ? 
i993 mm OO TOT CLE THE RANDOM 
033350 J SRAND CYCLE THE NUMBER GENERATOR 
1 BR GETPAT TRY AGAIN 
1S: RSL RS *MAKE CODE INTO TABLE INDEX 


ROUTINE TO GET THE PREVIOUSLY SELECTED PARAMETER VALUES 
; MOV #0P8, RO ;DPB_ADDRESS 
: ISR PC, SELPAR ‘SELECT THE PARAMETERS 
: JSR PC; GETPAR 





JO8 


SEQ 0099 


8 
; 4 
Beg ge B - Eas s ge & = uy 
ao ~ « w . be 
ft goog 5 Sue SEER es & we wes 
5 ott 8 852 < fe 5  £ 
g be Se Be wage & og @ S worh fg 2 
Sie BE Gos? Skee EF ge = See & wf 
E gecsen Rte by Beant : a ee veck 
5 gw a we — “= 72° oaxe 3 Ei eo88 a a of 2 
& yy. ™. “Hott eottee’ posse FS “ieee SE : aoe 
$2 Hats 5. "Sancteestietiestt @scbesacty & bats 
@ ¢¢ x=8 eea8 8@2 Eacee a 
: ae z 1 . i S S re ge ie 
Tel. Pee 
ae 3} sz 
oe eh ee oer cate aa oe 22 aus 


Beat as BEechebdeenbehis SSSSRCESESIES 
: 


;ROUTINE TO COMPRESS A LIST 


; CALL: 


MAIN PROGRAM 
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PC 


MAIN PROGRAM 
RTS 
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Pernt a ee 
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t ae EES Ege sS8ee ‘caieamans 
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: me Rats eraschSeeneha ets ast 4 a Srusavnbes 
a Cf : at 


| ie ms 4 8 
eae a i _ 


rem me 


TE dh a ht hh dt hd gs dd wt 
2OOOO0O00000000000 OOOO 0O0000OO00000 


SSS ivan hh an el aicendnremnemrnmnraiceir sccnircmiee 





000011 
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ets acai u ig caer er eee kerr iats 


BH Be Bt bt sb et Be bs se be 


PNISHEVFESSREBRKERVED 


SRREERS 
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;SET UP FOR EXIT 


) 
SCOMND(RO) ;0P CODE 

PC, GE GET’ PATTERN CODE 

RS-SPATTC(RO) PATTERN CODE 

SNEXT (RO) ‘CLEAR "PARAMETER SELECTED’ INDICATOR 

5 

Pick CLEAR MT FLAG 

SPACK(RO) : WT FLAG 

(SP)+ CLEAR STACK LEVEL 

MAIN : JUMP TO MAIN BACKGROUND LOOP 


THE BAD TRACK/SECTOR TABLE FOR 


j ROUTINE TO_ DETERMINE OF ERROR IS AT A LOCATION ON THE PACK DEFINED 
IN THE DRIVE. 


JSR 
MOVB 
WRT: Oe 
WRTPKS: 
CLRB 
TST 
JMP 
3 ‘CALL: 
: JSR 
4 RETURNI 
4 RET 
SPOTCK 
MOV 
MOV 
MOV 
ADD 
MOV 
1S: JSR 
CMP 
BNE 
CMPB 
BNE 
CMPB 
BNE 
BR 
es: TST 
3$: TST 
4§: ADD 
TST 
BMI 
DEC 
BNE 
BR 
SS: TST 
BNE 
MOV 
6S: ADD 
7$: 
MOV 
MOV 
RTS 


PC, SPOTCK 


BOm 
— gw 
ee 

a” 

% 

~ 

+ 


Boe 
8 
+ 
Ww 
v~o- 
+) 
— 
aa 


)+,2(R1) 


qanag 


Rast 


1$ 


; ERROR AT AN apne SS TABLE 
ENTRY FOR ADDRESS OR 
: PARAMETER ’NOTPRT’ IS 0 


Tack POINTER 
NEXT LOCI IN THE TABLE 
TABLE ENTRIES 


IF PAST 
L MAXIMUM ENTRY COUNT 
CHECK 


SET T 
1 
3 3 POP STACK INTO Re 


;:POP STACK INTO RI 
; RETURN 


5 26363322 2 EE a a a a a a a a a 
-SBTTL ERROR MESSAGE GENERATION ROUTINES 


INDICATOR FOR THE IDENTIFICATION LINE 
THE RETURN 


SEQ 0101 
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OZRMBA.P11 


SR RRe RIAN SSE a Tose Dee TRA ERC REMAERTORO UGE 


iid 


ata 
+ 


x 
. 

© 
+ 

c 





vr 4 


Renae 


vi 





SEs 


e 


pt ator—4 
nee 


023450 
0S2717 


002000 160750 


001174 


001201 


160734 


020406 


LINE1: BIT 8SW10, 2SWR sSWITCH 10 SET ? 
BEQ 1$ BR IF NOT 
TYPE SBELL “RING THE BELL 
1S: BIT BSWI3, ISWR : INHIBIT TYPEOUT ? 
BEQ BR IF NOT 
DISPLY *CR-LF 
BR 4g “EXIT 
2s: JSR PC, STIME ‘TYPE THE TIME 
DISPLY ,LINSPO : S 
3S: RTS pC RETURN & TYPE DESCRIPTION 
PRINT LINE 2 OF ERROR MESSAGE 
:*PRESENT ORDER = XXXX PREVIOUS ORDER = XXXX’ 
:°# ERROR AT BAD TRACK/SECTOR 
I a a i iy Seo RMR ROT? 
> *RMSN ies ame ace STATUS’ : 
:*BUS ADDRESS OR WORD COUNT NOT CONSISTENT’ 
:*RMBA = XXXXXX — RMWC =_XXXXXX’ 
:*BUFFER ADR = XXXXXX SIZE = XXXX ACTUAL NMBR WRDS XFRD = XXX’ 
tes MOV R3,-(SP) ;PUSH B R3 oN TACK 
NOV Ra -(3e) PUSH Re ON St 
DISPLY , SCRLF > ¢R-LF 
CLR 4s *CLEAR SS STORAGE 
a aoe 
MOV #LIN2C, 4S ; ORDER = ’ MSG 
tc tno RY iS IF ITs 
hid Haat i SURE Wee rie REMOTE 
TST S$ j SEE IF HNEHON 
BEQ LINE2A : NOT 
HOVE SoCo tRe) RY 1 POOVTGUS. OPE “1 a 
BIC HC7e RY : : SAVE Sey FENIE SCANT ITS 
ISR PC, 1§ i TYPE PREVIOUS MNEMONIC 
BR LINE2A : 
1$: CLR RS : TABLE INDEX 
23: CMPB © OPTBL(RS),R4Y  ;LOOK FOR THE OPCODE 
BEQ 3$ ‘BR COUNT EQUALS OPCODE 
TSTB —OPTBL(RS) ‘LOOK FOR END OF TABLE 
BMI 3$ *BR IF 
INC RS *T THE POINTER 
BR 2s CONTINUE - NOT END OF TABLE 
3S: ASL RS *SHIFT INDEX 
ASL RS : SHIFT INDEX 
ASL RS ‘SHIFT THE INDEX 
MOV #MNTBL , SS ‘ADDRESS OF ASCII TEXT TABLE 
ADD RS,5S “ADD THE INDEX 


27-JUL-77 08:07 PAGE 103 
GENERATION ROUTINES 


S$ REKLEGAELALRERERRARAL REL RRAR AEA ALKA ERA RARE ARES REAL AERA RELA E LE 
;PRINT LINE 1 OF ERROR MESSAGE: 
; HH: MM:SS’ 


SEQ 0102 
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OZRMBA.P11  27-JUL-77 08: ERROR MESSAGE GENERATION ROUTINES 
aud DISPLY TYPE IT 
4S: .WORD OO “ADDRESS OF ’PRESENT’ OR ’PREVIOUS’ MESSAGE 
eM? 3 ss: - «D Y 0 ; MNEMONIC 
. RT PC : TO MAIN NE! 
aida al 001362 LINE2A: Tg BADSEC PRINT Te eet LINE ? 
104414 001201 DISPLY ,SCRLF :CR 
1 14 051067 DISPLY ‘LI : ADDRESS DEFINED AS BAD AREA 
4 pSOaiG LINES: Ploy Datd oR REGISTER HEADER 
eee anit 15 preety *LINSPO : A 
001344 MOV UNIT. -(SP) *PUT THE DRIVE NUMBER ON THE STACK 
ae reat Joe Pest tnoec ——— 
c ie MOV bth as jREGIS INDEXES 
Seobad 160456 art , SHR ‘PRINT tte Fee SNE REGISTERS ” 
Je : BNE ‘ i$ : BR IF NOT 
0 MOV He ps SECOND DATA LINE 
14 oR : PC 3s PRINT THEM 
‘ 1 MOV T16,RS : THIRD DATA LINE 
i 14 JSR PC, 3s" : PRINT GISTERS 
; 100 o00016 1S: BIT setTe, STATUS(RO) . ATA RROR 
71 020s ooo02@0 MOV SWROL (RO), -(SP) Peete SIZE 
By f ee BOD SRENCCRO), (SP) i ROO ERT TO GN BYTE. INCREMENT 
S474 0: 000006 ADD SBUF (RQ), (SP) “BUFFER STARTING RODRESS 
000240 CMP (SP)+, (RO) :C CT BUFFER ? 
< BEQ es ;8R I ; 
Te DISPLY : US_AOORESS AND WORD COUNT ARE NOT CONSISTENT 
8 ISR PC, LINE3D *PRINT LINE 30 OF ERROR MESSAGE 
i 021320 te JSR PC, LINE *PRINT LINE 4 OF ERROR MESSAGE 
ae "Mov. (SP 4, RS ;;POP STACK INTO RS 
MOV (SP)+)R4 He ACK INTO R4 
20 MOV (SP)+,R3 ::POP STACK INTO R3 
RTS PC : TO PROCESSING ROUTINE 
3S: HOV (RS)+,-(SP) : PUT THe JESSISTER INDEX ON THE STACK 
oongon me 
F TST (SP)+ : CT THE STACK POINTER 
rm BESPLY | balysP PaO OF Line 2 
5493 BNE 3$ BR IF NOT ‘ 
Be 001201 4S: DISPLY pSCRLF CR 
* , 
;PRINT LINE 3 OF ERROR MESSAGE 
5498 ‘ERROR AT CCC TT SS PREVIOUS ADR = CCC TT SS’ 





SAT EAE GE OH BR eating 


1 


= 


Eg ta Eee Era A AY 





ae eee sont 051123 


020656 104414 
020662 000514 


020674 


060760 
AB 


D2 1000 

ea 02 11601 

Del005 O04 
10le 104414 
i 14 
1 

Bie 
1034 104414 

021040 





LINE3: DISPLY ,LINWG LINE 3 ENTRANCE 
Ba CIN3.1 FINISH PRINTOUT 

Petar eye = cee ERO cys CCC’ 

Leas Bs NS Sane 


OOTORT ONL scot END CHE = 
= CCC END CYL = CCC ACTUAL CYL = CCC’ 


perme afer rst N3.3 LINE 38 ENTRANCE 
;PRINT LINE 3C OF ERROR MESSAGE 
: START = CCC END CYL = CCC ACTUAL CYL = CCC TRK = TT’ 
LINESC: JSR pC ,LING.3 ;LINE 3C 
IMP LIA3.4 *FINISH 
PRINT LINE 30 OF MESSAGE 
:*RMBA = XXXXXX = XXXXXX’ 
LINE3D: BIT 8SWOS , ISWR ;SWITCH 5 SET ? 
BISPLY LING ee . 
MOV $RMBA(RO),-(SP) *-BUFFER ADDR REG CONTENTS 
Silay TEaRuOCT 7,01 0 re 
MOV SRMWC(RO),-(SP) WORD COUNT REGISTER CONTENTS 
IR < Pe .LINOCT ‘CONVERT TO OCTAL AND TYPE IT 
1S: RTS PC 
;PRINT LINE 3€ OF ERROR MESSAGE 
:*START CYL = CCC START TRK = TT START SEC = SS’ 
LINE3E: DISPLY : START cy. = 
MOV $CYL(RO),-(SP) MOVE CYL T 0's] TACK 
Silay TEypueet Did" 1 obcie 
DISPLY sLINSTS ; START TRK s 
stixcRo) (SP) 0 STACK 
IR ¢ PC LINDE TYPE IT IN DECIMAL 
RieUy tues Mle ae 
cro) (SP) CTOR TO STACK 
Ste ea ase ee 
RTS Pc 


;PRINT LINE 3F OF ERROR MESSAGE 


SE@ 0104 


CO9 


SE@ 0105 


CYLINDER ADDR ON STACK 
TRACK AND SECTOR ADDRESS 


CREMENT TRACK AND SECTOR ADDRESSES 


;PUT SECTOR/TRACK ADDRESS ON THE STACK 
;PUT DESIRED CYLINDER ADDRESS ON THE STACK 


z ae = 
TE ee 
aa he i] ee ae ReaoR es 
“Boe i «Be ORS Be ES 6 gerec” 6 -BBWhEs 
Seaimes = gE BE aan : 
A ee 
; $e Fs ata Ai 
ee ae ee 
@ 85 WS oben o & gstecs * ggste. 
E de vee a. @ 5% Rbk 2a ub Be : = fa g jee ty 
thot » maebslusanen ¢ Saline © Head 
E 4 2 8 pe ORS 
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: 
z 
3 
au 
Retsee 


aaaie 8 


se 
ise 
SESE 


aise Bia 
ee 


SHSFRAZSBL 


Yd ag od dg hd tu 
‘hen hem bam em ban haw ban ban han han bam lene ban bam ben) 


SHSSSSSRSRSRSSSS 


001201 


16 

10 oou73? Oeee42 
el4 104414 
000207 


cei 


cee 


SSIS AA 


om a ed td 


yh 
SSSSSSS 


oe S hee 
S8SS8S 


SASS 
UCL Ps sneaannns cei i a sas aaaaN eee TREE EES 


SEQ 0106 


(SP) ;PUT TRACK ON STACK 
"TYPE IT IN DECIMAL 


DOJ 


SALSA? "OI eNO ONE An Rafeg” OPO” PE 7 
SRMDA+ 1 (RO) 


x Psoes 


;PRINT LINE 4 OF ERROR MESSAGE 


MOVB 
Disp 
RTS 


000243 
pe 


116016 


S6l2 021302 


S 
: 5 ir ‘ 
= Be guts ; 
g cs a wee ‘ 

- 72 Sebecs 6 Bg: ae Pa eb ae es 
ies RRR 
@ £2 ehayett a a Cana tun 
eR ee 
sh geese Bos 
eee 1 ee Br eit 
Lies, b Beats Bee 
S nobestentemgate ye isboeake ie y s Sanaa? 
: ES i =f 
= a 5 eA 


: 
ee lt a 
no 


pi AT SS Se eer eure SSS: Me teerth cet 


= ben bap bap baw han ben ban ban ban bam bam, ban baw bam) Band ane rand ei manace cara etc an baw baw bam bam ham bem bam) 


SARA AOA DATA AAA RAR ARRAS 


000100 000016 LINE: 


noo0d2e 
051505 
4 
001201 


EQS 
DRAFT 2P-dUL~7? OBSON ERROR MESGRGE CENCRATION Routines) PACE 108 Sea 0107 


021544 iwi 052721 DISPLY ,LINXS ;APPENDING INFO 1/23/77 
N1550 104414 001201 3S: DISPLY ‘SCRLF 
2 021554 000207 RTS PC 
fe ;PRINT LINE 5B OF ERROR MESSAGE 
673 *RMECL = XXXXXX  RMEC2 = XXXXXX’ 
or ape 04414 051557 LINESB: DISPLY ,LINEPS ;*RMEC1 =’ 
2p 1bbe BMG 90309 €1(R0) ,~(SP) -PUT REGISTER CONTENTS ON THE STACK 
1 1 JSR LINOC ;TYPE IT 
1 104414 DISPLY ,L : 5 
ees ier ata oBi676 DISPLY ae 0S :? RMECe =’ 
i 16046 900302 HOV SRMECECRO) ,~(SP) rout REGISTER CONTENTS ON THE STACK 
161 4 001201 y P 
cee flee joni Ole pip 
epee pf ;PRINT LINE 6 OF ERROR MESSAGE 
BBB :*SECTOR IS ECC CORRECTABLE’ 
5688 921620 104414 051602 LINE6: DISPLY ,LINS6 ECC CORRECTABLE 
1 104414 00120! DISPLY ‘SCRLF 
5650 021630 000207 RTS Pc 
;PRINT LINE 6A OF E| 
ed EEC TOR RE Ab CORRE c £e ne OPE ee Tn 
S695 021632 104414 051635 LINEGA: DISPLY ,LINC6 ;PRINT READ CORRECTLY AT OFFSET N’ 
S636 021636 000411 BR LIN6. 1 TYPE THE REST OF THE LINE 
5698 PRINT LINE 68 OF THE ERROR MESSAGE 
39 :*SECTOR IS ECC CORRECTABLE AT OFFSET N’ 
e704 021640 104414 051602 LINEGB: DISPLY kites ;PRINT ’SECTOR IS ECC CORRECTABLE ’ 
;PRINT LINE 6C OF ERROR MESSAGE 
?*CORRECTED ON NTH RETRY’ 
5707 O2164%6 104414 051664 LINEGC: DISPLY LING ; CORRECTED ON NTH RETRY’ 
2708 021652 000414 BR LIN6.2 :TYPE THE REST OF THE LINE 
5710 ;PRINT LINE 6D OF THE ERROR MESSAGE 
oat * *UNCORRECTABLE AFTER N RETRIES’ 
5713 021654 104414 051713 LINEGD: DISPLY ,LINUO6 ; UNCORRECTABLE AFTER N RETRIES’ 
14 021660 000411 BR LINb.2 : FINISH 
1g TYPE THE OFFSET VALUE IN MICRO-INCHES 
5718 021662 006301 LIN6.1: ASL Ri ;DOUBLE THE OFFSET TABLE INDEX 
6719 tiers 016197 002470 021674 HOV ; OFMTBL(R1),1$  ;ADDRESS OF OFFSET POSITION MESSAGE 
eal tev. Onis 01201 18: orseey SCRE nicer 
5723 51508 000207 RTS pc 





? 
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157104 





SEEKER KERR EDAD EERE NENT EEERE EP EY EP SSSA EASES ESSE 
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TION ROUTINES 


;RETRY COUNT TYPEOUT 


LIN6.2: CLR 


Re Le ee ee 
3 ORDERS : XXXXX 


Ler: : . DISPLY 


1S: RTS 


; PRINT Te he 7A OF _ERROR ME 
3; ORDERS : XXXXX 


LINEmh: DISPLY 
MOV 


=(SP) rea ; CLEAR STACK 
BERT NOeS NPE ery tN N DECIMAL 
,LINRS : RETRY 
PC 
SSAGE 

TOTAL ERRORS: XXX  WROS XFRD:XXXXXXX  WRDS READ: XXXXXXX’ 
LIN70 INT ORDER COUNT 
BSOPERC,-(SP)  ;TO STACK 
RO, (SP) ADD THE BASE ADDRESS 
Be Sor PRS “PRINT IT 
LIN7T ; ERRORS 
STOTAL (RO), (SP) ;T0 ST 

LINDE ;TYPE IT’ IN DECIMAL 
LIN7x XFR’ 

RANS, ~(SP) ADDRESS OF LOW WORD ON STACK 
PC, $0B2D ; 
PC’ SSUPRS jPRINT 
LIN7R >*BITS , 

: es) LOW ADDRESS 
PC; SDB20 ; CONVERT 
PC ;PRINT 
” SCRLF 
ASH1S, aSHR SEE IF “HALT ON ERROR’ - SWITCH 15 
2 Ba IM 1S HALT 


TOTAL SEERSEXXXXX TOTAL MISPOS ERR = XXX TOTAL SKI= XXX’ 


BSOPERC,-(SP) ;ORDER COUNT INCREMENT 
RO, (SP) = ADD ss 

’ $DB2D : THE 
PC’ SSUPRS PRINT IT 
LIN7P :* TOTAL SEEKS = ’ 
aSPOSIT, ~(SP) >TOTAL SEEKS 
RO, (SP) *DEVICE TABLE ADDRESS 
PC, SDB2D : THE SEEK COUNT 
ae thi RT TAL MISPOS ERR = * 
$MISPO(RO),-(SP)’ ;TOT 
de ot em = 
$SKI(RO),-(SP) CONVERT & PRINT IT 


SEQ 0108 
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156764 


s 


D22234 


PEUETcCE PERE ER PERS TRE ERES IE 


b+ Bb bb bs bb be pe 
WONOU CWO 


ininaisiis sabia as 


PERFORMANCE EXERCISER MACY11 30( 1046) 
ERROR MESSAGE GENERAT 


27-JUL-77 08:07 PAGE 110 
ION ROUTINES 


SE@ 0109 


IR PC, LINDEC ;TYPE IT IN DECIMAL 
DISPLY SRE 
ir 
bes, asHR ;SEE IF HALT ON ERROR - SWITCH 1S SET 
As Pat - :SWITCH 15 HALT 
;PRINT LINE 8 OF THE ERROR MESSAGE ~~ 
: DIFFERENT ERROR DURING RETRY’ 
nam DISPLY LIN@M 
JSR PC LINE2 ;PRINT LINE 2 OF ERROR MESSAGE 
j QCTAL TYPEOUT ROUTINE 
HOV ae NUM, = (SP) ;PUT THE NUMBER ON THE STACK 
RETURN 
LINOCT: HOV asp) -(SP) ;PUT IN PROPER LOCATION ON STACK 
MOV (SP)+.1§ GET THE ADDRESS oF THE ASCII STRING 
BOD y a5. ,1$ ORES THE LAST 6 ASCII DIGITS 
1S: -WORD O * ADDRESS 
MOV (SP)+, (SP) *CORRECT THE STACK 
RTS PC * RETURN 
; ROUT INE TO CONVERT THE INPUT NUMBER TO DECIMAL AND TYPE IT WITH 
> CALL: - 
: HOV NUM = (SP) ;PUT THE NUMBER ON THE STACK 
: RETURN 
LINDEC: MOV 2(SP),-(SP) ;SET UP STACK FOR CONVERT 
JSR PC, $SB2D :CONVERT IT TO DECIMAL 
JSR PC’ SSUPRS TYPE IT (WITH “LEADING ZEROS SUPRESSED) 
Hoy (SP)+, (SP) "RESTORE STACK POINTER 


5p RRRRRARAA EERE ELLE ERRE LEELA ELLE RE AE ERE ELE EEL ERASE EERE EES ELLE LE 


-SBTTL GENERAL SUPPORT SUBROUTINES 
5p RRRRRLLAE RARER AERA E EERE EERE EE ERLE ERAS RELA ELLE REESE LER ELE RL LE RE 
; DECRENENT THE SECTOR-TRACK ADDRESS 

s0PB, RO ;DPB ADDRESS 
PC, READOR 
ONTAINS THE CYLINDER ADDRESS 


. JSR 
. T 
; (SP) C 

; Stsp) CONTAINS THE TRACK ADDRESS 





SSssersecerereRenees 


—— = 
se 
ge b= po 


[=] 
be 





8 
§ 


as 


CKCLK1: 


CKCLKe: 


1$: 


27-JUL-77 08:07 PAGE 111 
jTINES 


4(SP) CONTAINS THE SECTOR ADDRESS 





DEC 
NOP 
RTS 
;ROUTINE TO CHECK FOR KW11-L OR KW11-P CLOCKS 
CKCLK: 


aoess 


SPAeIgS SSeS OSE SSS eS toe 


Rove THE RE ety TURN ROOR DOW THE STACK 


6(5P), (SP) : 
B (SP) : CLEAR stack FOR SECTOR 
(SP) ele aT ARK FRR NOER 
(RO) (SP) i; CTOR ON STACK 
ChAT ot ehF” ove TRBER BBBREES 
6(SP) : SECTOR 3 ” 
18 : F SO 
(SP) : DE ONE SECTOR 
*BRANCH TO EXIT 
ty teat Terese 
#31. ,6(SP) ‘LAST SECTOR 
4(SP} iDECR TRACK 
#31, (SP) “LAST SECTOR 
2(SP) *DECREMENT ONE CYLINDER COUNT 
PC + RETURN 


#-1,CLKFLG ; CLEAR CLOCK AVAILABILITY FLAG 
#-1' PCLOCK Shey CLOCK AVAILABILITY FLAG 
ackCLKI. ERRVEC UP VE bbe OR CLOCK CHECK 
SERRVEC SS 
QSLKCSR cheek FoR KW11-P 
CLKFLG *SET CLOCK AVAILABILITY FLAG 
PCLOCK SET KW11-P CLOCK FLAG 
C,R1 *KW11-P VECT $s 
BCLOCK, (RI) uP KW1l-P VECTOR 
#300, (R1) :PSW - PRI 6 
$-1667.,aSLKCSB ;LOAD COUNTER BUFFER WITH 16.67 
8131, gSLKCSR *SET CLOCK - CNT UP, 10US, CONT INT 
#4, SP ;RESTORE THE STACK cena 
#CKCLK2, J#ERRVEC’ ERROR VECTOR TO CHECK FOR KWL1-L 
aSLKS ;LbOK F FOR KWll 
SLLVEC,R1 tact Ft oes 
#CLOCK’ (R *SET UP KW11-L VECTOR 
8300, (R1) :PSW - 
#100) #SLKS SET KW11-L INTERRUPT 
84. SP ;RESTORE THE STACK POINTER 
NEDCLK -*P OR L L CLOCK MUST BE ON SYSTEM’ 
42 *UNDER MONITOR CONTROL ? 
1§ *BR IF NOT 
$GETY2 j ABORT PROGRAM 
START TRY AGAIN 


SEQ 0110 





3 
: 


wn 

ODDO 
ee eet or ee 
WF Wie O 


puggageees 


quummraaunmenGY | 
coe 


. 

vo 
co 
fe 
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012737 000006 OO0004 CKCLK3: MOV 86, JBERRVEC ;RESTORE THE ERROR VECTOR 
000207 RTS PC 
; ROUT INE TO DISPLAY STATISTICS FOR ALL DRIVES ASSIGNED 
Per ISR oy PC, STATPR 
010046 STATPR: HOV RO,-(SP) ; SAVE RO 
Boer3e 001544 TST ASALST t BNY" DRIVES ASSIGNED ? 
OOiNe3 BEQ 3$ BR IF NOT 
022730 ISR PC, SHDTYP TYPE THE HEADING 
CLR RY “CLEAR THE DRIVE INDEX 
16400 002102 1s: Pet Btkaorcry).RO  SGET THE DRIVE’S BLOCK ADDRESS 
ASR RY ’ “RESTORE RY 
1 034304 001544 BITB ATABIT(RY),ASNLST ;IS THIS DRIVE ASSIGNED ? 
001404 BEQ 2s BR’ IF_NOT 
O07 37 922752 sR PC, SDETAL ;TYPE THE PERFORMANCE SUMMARY 
00S204 2S: INC RY ONCREMENT THE INDEX 
fare, uo ge hPa 
12604 3S: MOV (SP)+,R4 "RESTORE RY 
012600 HOV (SP)+, RO RESTORE RO 
000207 ; RETURN 
; ROUTINE TO TYPE STATISTICS FOR AN INDIVIDUAL DRIVE 
pens #0PB, RO ;DPB ADDRESS 
; ie Ber PC, TYPEST 
010046 TYPEST: MOV RO, -(SP) SAVE RO 
010446 MOV RY, -(SP) SAVE RY 
004737 022730 JSR PC; SHDTYP ‘TYPE THE HEADING 
GOS004 CLR Ry me i CLEAR R4 FOR DRIVE NUMBER 
1 p 737 O227S2 i3 PC SDE TAL : ry E The. STATISTICS 
15eb0 nov (SP)+,RO ; RESTOR RO 
000207 3 
i TYPE THE HEADER FOR THE DRIVE PERFORMANCE SUMMARY TYPEOUT 
; . ISR PC, SHDTYP 
004737 02 SHDTYP: JSR PC, STIME ;TYPE THE TIME OF DAY 
S043” 853706 JSR RS, TYPRI4 i TYPE AT PRIORITY 4 
004537 027706 36h . RS, TYPRI4 ‘TYPE THE HEADER 
1 STATHD * HEADER 
RTS PC * RETURN 





a° 
; 
3 
: 


A VERPSEESeS() CULL SERERPRRSKUr ede renee 
aS 2 Ss 


. 

vo 
cs 
— 





+++ 












xf 






BERR 


. 
a ee 


Ft 2IERRLEEARNRISENRVS 








ie) 


Zped 


- 


a 


wae 


He a 


Lee 


Ba 


RS 
5 
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Quote) 27-JUL-77 08:07 PAGE 113 
INES 


_ THE PERFORMANCE SUMMARY DATE LINE 


SDETAL: 


HOV 


RETURN 


REBB-SRIBE- REBT R 


sor, RO 


*3 Bey 


Bo RRR 
=§ @g-8ag 
8 


es 


iBBE RODRESS 
;SAVE Re 
:DPB ADDRESS 
sFIRST STATISTICAL FIELD 
3 wee TYPEOUT 
a SARC II 
tt ZEROS 
- PUT cleat it COUNT ON THE STACK 


or 3 DIGITS 


‘PUT ON THE STACK 
;CONVERT IT 


Type a brciTs 
i spaces 


; INCREMENT_R2 


: PUT IT ON THE STACK 
S CONVERT IT 

SPOSIT 

& DIGITS 
INCREMENT 

;PUT § 
TYPE IT 
;TYPE 10 DIGITS 


Re 
ON THE STACK 


31 Re 
iPUT. SRE SREAD ON THE STACK 


Nee 10 DIGITS 


31 SPACE 
ic Re 


; INCREMENT Re AGAIN 
;PUT SSOFT ort STACK 
; 


; TYPEOUT 
; TYPE 4 fairs 


s Ss 
S BUT SHARD ON THE STACK 
SHARD 


; CONVERT 
; TYPEOUT SHARD 
; TYPE 4 DIGITS 
‘PUT $SKI ON THE STACK 


SEQ Olle 


KO9 
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030246 JSR PC, SSB2D ;CONVERT $SKI 

027556 JSR RS, REPLZ 5 TREO Sait 


LINSPO : 
tR2)+, -(SP) -PUT SMISPO ON THE STACK 


a eee fa le 


023204 
race 


SeaenaS 


MOV 
SUB , ), SP) ; SUBTRACT SSOFT FROM STOTAL 
auB cate tS). SUBTRACT ScxtorROM Stora 
SUB SPO(RO), (SP) ;SUBTRACT SMISPO FROM STOTAL 
‘CONVERT OTHER’ COUNT 


d ; YPE 
: 4’ :TYPE 4 DIGITS 
TST ‘s SP)+ CLEAR STACK 


555282265 
bb Fb 


aaa 
3 
: 





;ROUTINE TO INCREMENT SSOFT 
3 


;NOTE: SSOFT WILL NOT BE INCREMENTED BEYOND 9999 (10) 


923304 005737 001362 INCSOF: TST BADSEC :SEE IF BAD TRK/SEC INDICATOR SET “~ 
3310 001006 BNE 1$ :BR IF IT’S SET DON'T INCREMENT COUNT 
1 000060 023417 CMP $SOFT(RO), #9999." : 15 SOFT ALREADY AT MAXIMUM ? 
1 BHIS 15 ;BR IF IT I 
000060 INC §SOFT(RO) ; INCREMENT $SOFT 
023326 000207 1S: RTS PC ; RETURN 


;ROUTINE TO INCREMENT SHARD 
SHARD WILL NOT BE INCREMENTED BEYOND 9999 (10) 


di aed, in ects es eg 
026027 023417 CMP SHARD (RO), #9999. 
493008 BHIS 15 rs ir sre 
I SHARD (RO) INCREMENT SHARD 
023352 000207 1S: RTS PC : RETURN 


;ROUTINE TO INCREMENT $SKI 
“NOTE: SSKI WILL NOT BE INCREMENTED BEYOND 9999 (10) 


Mcuucaeeer ey eeee rier inal ei ats 


023354 005737 001362 INCSKI: TST BADSEC ;SEE IF BAD TRK/SEC INDICATOR SET 
901906 1$ sBR IF a S SET DON?T INCREMENT COUNT 
5 a 000064 023417 ch + $5K1(RO) , #9999. da? 1% $SK1 ALREADY A MAXIMUM ? 
02 i200 "i 000064 INC $SKI(RO) T INCREMENT $SKI 
6059 023376 000207 1S: RTS PC ; RETURN 





j 
t 
3 
: 


POO SCS SSK KS 
mmm me = SSS SSS 


or 
WLW 


SSL GOEL SNELL ; 





103002 


cas 


001362 


001372 
Bing 
000074 


001370 
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023417 


023417 


LO9 


— 08:07 PAGE 115 SEQ 0114 


;ROUTINE TO INCREMENT SMISPO 
;NOTE: SMISPO WILL NOT BE INCREMENTED BEYOND 9999 (10) 


INCMIS: TST BADSEC ;SEE IF BAD TRK/SEC INDICATOR SET 
BNE *BR IF IT’S SET, DON’T INCREMENT COUNT 
CF SMISPO(RO) , #9999. 1S $HISP0 ALREADY AT MAXIMUM ? 
INC SMISPO(RO) F ; INCREMENT SMISPO 

1S: RTS PC ; RETURN 


;ROUTINE TO INCREMENT STOTAL 
;NOTE: STOTAL WILL NOT BE INCREMENTED BEYOND 9999 (10) 
F BAD TRK/SEC INDICATOR SET 


INCTOT: TST BADSEC 
BNE 


1$ ‘Bae ie IT’ SET, DON’T INCREMENT COUNT 
CHP STOTAL (RO), #9999 iTS sto aL ALREADY AT MAXIMUM ? 
INC STOTAL(RO) ‘ TT NGREMENT STOTAL 
1S: RTS PC ; RETURN 


;ROUTINE TO TYPE THE TIME 


STIME: 


TST 


pid gauge aad 22 


- 


cs 


. 
é 


sCLOCK ON THE SYSTEM ? 
*BR IF NOT ‘ 
“PUT HOURS’ ON THE STACK 
; CONVERT TO DECIMAL 

Tyee 2 DIGITS 


Ae cnt ta fe ON THE STACK 
ONVERT TO DECIMAL 


ay e DIGITS 


‘PUT SECONOS ON THE STACK 
;CONVERT TO DECIMAL 


;TYPE IT 
;TYPE 2 DIGITS 


; INCREMENT THE 1/60 SECOND COUNTER 
Rest a SECOND NOT COUNTED 


AT MAXIMUM ? 
;BR_IF NOT 
;CLEAR THE SECOND’S COUNTER 
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OZRMBA.P11 


~~ 


~BBSVRR 


S55 UF RIOR SSHVERLOOH ESSLFHESH-SSBVKREBS 


OO 0 0 0 0 Ob 0 0 OO 0 0 0 0 0 Bb 0 0 8 bo bb 0 = 0 be be 


PEP POPP POPOL POPP SS SSK Kerra 


“N 
— 








001470 
001314 


3 


a 
2 


KSR1: 
177776 


; ee 


SpEgueegzy 


g Cea gay 


aig § 
; 


INTRVL42 
ae. 
MINUTE 
HOUR 
e 
420,-(SP) 
RPTHR 
NTRVL 


cs 


INTRVL, INTRVL+2 
2s 


$-1, STATIN 
INTRVL+2 


MO93 
27-JUL-77 08:07 PAGE 116 
NES 


. » MINUTE 
HOUR 


SEQ 0115 


ORMANCE SUMMARY ? 
INTERVAL FINISHED ? 
;BR_IF NOT 


;SET PERFORMANCE SUMMARY DISPLAY FLAG 
;CLEAR THE PERFORMANCE INTERVAL COUNTER 


Se aa 
fh 


;°CFLAG’ IS NORMALLY SET BY THE TTY SERVICE 
'ROUTINE IN INTERRUPT MODE 

BETER KEYBOARD SERVICED 

SANY OPERATIONS ACTIVE ? 


;’SYSTEM BUSY 
;SAVE THE REGISTERS 


SER Tre CONTROL C’ FLAG 
; TYPE THE TIME 
ANY GARBAGE IN THE TTY BUFFER 


RET 


EXIT 

3PO 

;EQ T 

EO T AN *A’ 

;BR IF IT IS 

;ORIVE NUMBER GREATER THAN AN ASCII 7 ? 
;BR F IT IS 

‘BR LESS THAN AN ASCII 0 ? 


I 
iF IT IS 
LEAS OM ONLY LOWER 3 BITS IF CHAR NOT ’A’ 


3E 
;8R IF NOT EQ 
eT DRIVE FOR TEST 


EQ TO ’D’ ? 
;BR IF NOT EQ 
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6178 JSR , DEASGN spengsian DRIVE 
XI 
6174 CMPB OS s«#’S, -1 (RS) EQ TO 'S? 
pire OBE scHnp ied SMATIST ICS 
1 BR EXIT 
1 CMPB ss 8’ Wi, -1 (RS) 7EQ TO °W? 
1 BNE cs :BR If NOT Fa 
1 BIT #SWO, aSWR 71S SWITCH O SET 
1 1049 BNE 6 *BR IF SET, CAN’T DO ’W’ COMMAND 
1 JSR PC, DATAPK WRITE A DATA 
j 37 BR EXIT 
1 CMPB 0 s«8#R, -1 (RS) 7EQ TO ’R’ ? 
1 I BNE 6$ BR IF NOT EQ P 
bi ISR PC, REDAPK j READ A DATA PACK 
1 BR *EXI 
61 CMPB 8’ WW, -1 (RS) iat COMMAND ? 
pi area #°A, 1(RS) sALL DRIVES ? 
4 BEQ : 
6 1 CHP 1(RS),8°7 j GREAT THAN 7 
1 t CMPB s«AA( RS), 80 *LESS THAN O 
1 1 BLO YES 
1 ie 477770 BICB 8tC7 185) *CHOP OFF HIGHER BITS 
ole telcos 162 9g JSR PC, WATPAK *ASSIGN DRIVES WITH WT COMMAND 
4 053570 b T , INVLD :T NVALID MESSAGE 
tga TPE, poh gone 
154734 TST aSTKB he TTY BUFFER 
gee ber 72 000100 154724 BIS 881706, aSTKS TTY INTERRUPT ENABLE 
177776 CLR PS iat PRIORITY BACK TO ZERO 
000207 RTS PC : RETURN 
ROUTINE TO PROCESS THE ASSIGN REQUEST (’T’, ’R’, OR ’W’ COMMANDS) 
430715 000101 ASSIGN: CMPB 8A, (RS) ;ASSIGN ALL DRIVES? 
1426 : BEQ Asche :BR IF FL IVES 
pai Ole 053026 026564 ae V SUNTASN, ASNMSG sPUT DR Mech ttt MESSAGE ADDRESS 
18 Bf 4 ? 001544 BITB ATABIT(RY), RSNLSt ORIVE ALREADY Y ASSIGNED ? 
pid BED Sas & ae JoVRssten oRIVE 0 » 
1 0 3106 026564 
Sib fetes sar SERS St 
Bs 1403 
Be a 
137 026544 
be2¢ 000024 000041 
PSS 1 000001 
fee ne on 
P558 . ol 053026 026564 
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136437 034304 001544 BITB app ,ASNLST ;ALREADY ASSIGNED ? 
BGE 
RTS PC ; 


: es J PC, ASGNS TES on THE DRIVE 
S400 4s: JSR —- PC, ASNERR 


il tar os Te 
—_— 3s: INC RY’ 
000007 ‘ CHP 87,R4 IAT Save VE CRECKED ? 
026544 PC, R MESSAGE 
37 a 001544 ASGN3: BITB BTABIT(RS), pouste Baie ALREADY ASSIGNED ? 
gis779 





;PUT 
ponte tints 


aR Re. GETAOR 1! Bo Sett08 emo Faire 
818760 po00e1 00070 St) ARNT (0) SOE COT 0 1 
001316 pat ;WRI DATA PACK ? 


es ;8R_IF NOT 
PACK, SPACK(RO) ;SET READ/WRITE DATA PACK INDICATOR 


ae, DRIVE RODRESS 


apeRASSe 


: 
£32 


SESSLER ESR DEES 


Saucy 
fete 
Geveos 053125 026564 ASGNe: MOV TSAF , ASNMSG * MESSAGE ADDRESS 
024530 000137 IMP _—ASNERR :70 S  ERROR SO TINE 
oes 034200 ascN7: TSTB  ORVTYPCRY) ORI 
OOS ‘BR IF DRIVE OFFLINE 
Gee 053054 026564 OV _BNOTRN, ASNASG ores ‘NOT RMGQ’ MSG 
Gave 012737 OS3071 G2e54 1S: HOV _ANOTPRS, ASNSG ee OF "NOT PRESENT’ MSG 
Seueet Bis75) 052763 O26S64 25: OY INTOFF,ASHWISG AOORESS OF ORIVE OFFLINE? NESSAGE 
024572 000137 026544 ig:' NP sOASINERR STO CEROR ROUTINE 
T’ COMMAND (ROUTINE TO ASSIGN A DRIVE) 
Gevs7e 905037 901316 NEWASN: CLR PACK ’W? COMMAND INDICATOR 
1 343 NP ASSIGN TO THE ASSIGN ROUTINE 
;°D? COMMAND (ROUTINE TO sane  ounii 
Gevé0e 005004 DEASGN: CLR RY 
10 012702 000010 MOV. sa. , RB . COUNTER 
Ge4614 122715 000101 CHPB ow’ A’ (RS) SBEASSIGN ALL DRIVES ? 





; 
4 


AAAS ts wn canta Lack Reha MET ato 





8 
q 


z 


a 


eS 


000001 
034304 


001544 


026564 
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SY CABITOO. Ra BR Ea FS IT 
Hove eRe CRA BET DRIVE NOPBER 
1S: Te RTABIT(RY) ,ASNLST — ;DRIVE ASSIGNED ? 
BICB ATABIT(R4Y),ASMLST ; DRIVE FROM THE ASSIGNED LIST 
ASL “ . Pie Tio A WORD INDEX 
MOV BLKADR(RY) ,DUNITERS) PUT ADDRESS IN DEASSIGN LIST 
ASR 
2s: DEC R3 ANY MORE DRIVES ? 
BEQ 4§ BR IF NOT 
ef 
3S: MOV SUNTNOT,ASNMSG ;ADDR OF ’NOT ASSIGNED’ MESSAGE 
ISR ASNERR REPORT IT 
CMPB sag’ A, (RS) ‘ALL DRIVE ? 
BEQ es ;YES 
4s: TYPE SCRLF 
RTS Pc 
7S’ COMMAND (ROUTIic TO TYPE DRIVE PERFORMANCE SUMMARY) 
SCMND: CLR RY 
pera’ tS) i COUNTER FISTICS ? 
go° 3s’ BRC IP ree 
MOVB (RS) .R4 GET DRIVE NUMBER 
BITB ATABLT(RY),ASNLST ;SEE IF DRIVE ASSIGNED 
BEQ 1S BR’ IF NOT 
ASL RY : DRIVE ADDR INTO WORD INDEX 
MOV (R4),RO  ; OF BLOCK 
ISR PC, TYPEST i TYPE DRIVE STATISTICS 
1S: MOV SUNTNOT,ASNMSG :ADOR OF *NOT ASSIGNED’ MSG 
ISR PC, ASNERR > TYPE ERROR MESSAGE 
BR aS *EXIT 
3S: TSTB © ASNLST ANY DRIVE ASSIGNED ? 
BNE 4s * YES 
BR ? RETURN 
4S: ISR PC. STATPR TYPE ALL STATISTICS 
TSB ~—soDATE : F ’DATE’ 
BEQ 11 *BR IF NOT 
TYPE »DATEIS :*DATE: ° om na 
11S: TetB OPERID : CoE oF SP OERATOR 1.0. ENTERED 
BEQ 128 *BR IF NOT 
TYPE, sPearp j “OPERATOR 1.0. 1, 
12s: WE MEDLIN SHEROGR LINE 
MOV bORIVEO+SDRVID, 6$ ; DRIVE 1.0. FIELD ADDRESS 
cS: BITB ATABIT(RY),ASNCST ; F DRIVE ASSIGNED 
BEQ 7§ BR IF NOT ASSIGNED 
MOV RY, -(SP) 3s SAVE R4 FOR TYPEOUT 
$8 DRIVE NUMBER 
TYPOS ?:G0 TYPE--OCTAL ASCII 
-BYTE 2 :: TYPE 2 DIGIT(S) 





D10 


SEQ 0119 


: 

3 : oF 

a8 68d SE es 
Hoard GREE athe os 
ope &- "bbe | 3 Sse Soye Ohi Ines 
Sra ee ee 
2: Se 
EE ee 
F > . 2 3 3 $ : 
at : z# ws ete . ? et BBS ay: he a. 
Agee, Bocbeote 2 5 23 ent 3 x : S sievewutonvetdn® z 

E Et het fetuae, te : Be Fi} Bef 5a ‘BRRERGRGUROEONREES 


025116 


7: 
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1316 
000001 001316 REDAPK: 


024242 


& xe fs 
ee 3 


a 


RccuGaGioneGe 
sone hen ham hem ham ban. pen pen ban pan ban pap ae) 


$4t tt ded tt ig 


& Ge E 
was 


UE 


27-Su- 
ae 
O1 
000137 






eh oh oh 


SEE TESS aS Sat con aE 


000304 
001201 
025150 012737 177777 001316 DATAPK: 
Oe424e 
000001 
177776 
024242 


025156 000137 
gta 
rast 

be Oesete 





- 


E10 


SEQ 0120 


gS 8 gf tg 

Fea’ Sd 
pb | =6os hb de bys 
spe: ie) ety ped ie 
ee oe es 
; fee pee eg Boer, ace" ik geoty yuh weeeere= 
rg aiease O28 5 asl Peer can 334 
4 8 BE a : c ER EEE 
33 -=z-~Be Of & F FE > 968. 
Doeimies @ 2 ake 
so Unmeswnawased Oh, 8 geonczce eae Alay SinrSeeue 
iE sulelPdecsSse eueee sevete Eeeteied FiteSevFoussenes 
ALU UTE 
Bed geueaeees lan oe 
: pesacecs eee Se PP Es 





GOs GEES RES Rane 


A viheceateats ceeneeneeretcerecteceeceeererr este teet eet: 


~0ZRMB 


F10 
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$ RY 
OPLAt 
CYLIMT 


SEQ 0121 


3 
J 
Oo 
3 
~ 
e 
& 
e 
w 
x ‘ 
ive 
et 
= 


OA 


ee 
iN 
ate 


iCOSTEVER GER CAP" Foe LAST CYLINDER 
aie 
YES ve 
ve 
TIAL 
TIAL 
RY 
RQ 
FROM THE OPERATOR 


ates 

, 10(R3) 
PARENT 

(RO) "STARK 

(RO), SCYL 

Ra 


ote 
4 NN 
OT attr 


pty uttttt 


8 
: 
1 


— 
4 
5 


wo - ~ 


;ROUTINE TO GET THE DRIVE I.D. 


1$: 





Bie Se 
#85 2¢ 2 
ygeaee : Tint 





nystsStant senyEo Steere. 


a 6 Beeass 
quate 


th eh ed od 
on Ineee Kane Reon name eee 2) 


d bddacatiancancncctce 
i} Waeoronsaevasysy arcececceyceneemenmnrecrenrenteaaaaaats 


RTS 


ROUTINE TO GET THE ADDRESSES OF ANY BAD SECTORS (UP TO A MAX OF 16) 


es: 


G10 
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SEQ 0122 


GENERAL T SUBROUTT 


A0/00 PERFORMANCE EXERCISER 
ll gine 08:04 


OZRreA. PII 


= q@ wy e 4 . 
4 588 us e-- m : : - 2 : 
ee ee ee et 
{ iylipiectag! el muta Mtg lo 
Beker ege RiOES peat ater eae ene 
a Sel -LD Aantal eerie 
er i A 
wh 
3 - ; a 
a! oe ee fag g 
Me a: . @ a sce oS 
ais yas esoong hs Lees no Te Fenian acai 
of ssuvSeSeSssseactatar Sasha caDSSSSehGheetaade te tsakaSes 


: 
is 
; 


a = = 


1S: 


r o 


an 


: 
8 


a . 


————— 


a ad a ad ad ad od 


Sees 
eeeeeremnnemeerres 


A 





i’ bea 








Ge 
ens 





° 


EEEFEEEPERSER SORES RERRERRDORREROTEEETEE | 


FEEEEESEEE 


OWOnNDUL 
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026314 001412 BEQ 10$ ;BRANCH IF NOT 
iBuuot © Bessee Hee Dntriés ta 
111046 move {RO),-(SP) : 
104403 TYPOS 
e BF ha 
“BYTE 
104401 001201 i! jOR LF 
909943 001264 10S: IT seiT1, SCOW! : 16 BAD SECTORS ? 
001411 BEQ 11$ ‘BRANCH IF NO 
Bree inet o54201 Nee Te OVER OAD SECTORS DETECTED 
B32 11104 move [RO),-(SP) ; 
5364 1 TYPOS 
a BYTE 2 
~ es BYTE 0 
104401 001201 TYPE SCRLF 
; 001264 11S: ST $cOul ; ERROR FLAG oe ? 
062705 000002 she ADD #2,RS ‘ADJUST FOR NORMAL RET 
1 “MOV (SP)+,R4 ;;POP STACK INTO RY 
raat Bi 5003 MOV (8p)3° Ra ;;POP STACK INTO R3 
O26412 012602 MOV (SP)+’R2 ::POP STACK INTO Re 
bepHi4 01601 MOV (SP)+°RI ::POP STACK INTO RI 
16 RTS RS sEXI 
; PARAMETER ENTRY ROUTINE 
MORRO B Ane CE CORETERS 
: JSR PC, PARENT GET THE 
910346 See PARENT: HOV R3, = (SP) ; SAVE THE PARAMETER TReLE ADDRESS 
S1e337 026436 1S: MOV (R3)+, 3S ROORESS OF SRRARE TER NAME 
1442 BEQ 95 ‘BR IF AT END OF TABLE 
: 3: wn 0 i DODRESS: OF Pane TER TENE. TEXT 
1 . MOV (R3)+,Re2 "MAXIMUM PARAMETER VALUE 
912305 MOV (R3)+,RS ADDRESS OF PARAMETER 
11 MOV (RS), -(SP) :CURRENT VALUE OF PARAMETER 
: ae TypDs ; TYPE, THE CURRENT VALUE OF THE PARAMETER 
Teco a neo Tie. 
12601 MOV (SP)+,R1 INPUT ASCII STRING ADDRESS 
001360 TST CFLAG i AGONTROL of ENT ? 
030110 ISR RS5,CK.DIG :CHECK THE DIGIT(S 
os SORTA OMY GEREN eREL 
le ees ; ILLEGAL eur 
S$ TERMINATED WITH A CARRIAGE RETURN 
peceag 5 TERMINATED WITH @ =!" 
026506 010215 MOVE 





3 
i 
‘8 
‘8 
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27-JUL-77 08: 
1S : PARAMETERS 
OS40SS 6S: PRE BADENT Eo ONTRY’ 
000006 SUB ,R3 ‘DECREMENT THE TABLE POINTER 
BR 1 ; TRY AGAIN 
7S: MOV Re, (RS) VALUE 
BR 9§ PEXIT 
001360 8S: CLR CFLAG ‘CLEAR THE "CONTROL C’ FLAG 
HOV (SP) ,R3 sR ORD THe PARAMETER TABLE ADDRESS 
9s: TST (SP)+ ‘CORRECT THE STACK POINTER 
RTS PC * RETURN 





384 a ASSIGN/DEASSIGN ERROR MESSAGE 


LER LERIELSTSSTPRUEE DFE RTEPEEREERTEREEE @ 
: tsi 
: 
: 


: HOV SHESADR, ASNMSG sERROR MESSAGE ADDRESS 
: Pee 
ASNERR: TYPE » QUES j QUESTION, MORK 
rouge rovens MOV Au -( : SAVE ef FOR TYPEOUT 
:: TYPE DRIVE NUMBER 
104403 TYPOS GO TYPE--OCTAL ASCII 
002 .BYTE 2 >: TYPE 2 DIGIT(S 
1 000 “BYTE O ;: SUPPRESS ING ZEROS 
026562 LOWHOL ° _ TYPE : j TYPE SPECIFIC fESSAce 
Geesee 104401 001201 risen iVPE SCRLF a 
000207 RTS Pc 
; DEASSIGN DRIVE IF A FATAL ERROR OCCURS 
: JSR PC, DROP 
: RETURN 
026574 00s004 DROP: CLR RA CLEAR Bt FoR DRIVE NUMBER 
SSeeoe 146437 034304 001544 Bice afnatt CRY), ast NRENOVE EORIVE FROM RSSIGNED LIST . 
eth 001546 MOV RO, DUNIT(R4) PUT DRIVE VE IN LIST ames 
14 104401 001201 TYPE =, 
C26620 104401 001201 TYPE  ,|SCRLF 
104401 053341 TYPE | DROPNG : TYPE “DROPPING DRIVE’ 
1 053452 Type aRNUM j DRIVE 
026636 010446 MOV RY, -(SP) : : SAVE Ru FOR TYPEOUT 
ath! 104403 TYPOS He - I 
: 002 -BYTE : :: TYPE 2 DIGIN(S) | aaa 
rae 1oNaot 001201 TYPE SCRLF = 
026650 105737 001544 TST6 RSNLST ;MORE DRIVES ACTIVE 
Geeee 008732 oo0042 TST ane ;ANY MONITOR ? 
026664 005726 TST (SP)+ *CLEAR STACK 








: 
& 
i 
: 
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vu 
aa 
_— 


sULETOUEEDELEEREEEELSERE 


Saori saice dace 
Gees) BTN SEG 


027250 JMP SGET4e ;GIVE CONTROL TO MONITOR 
18: RTS PC 


;ROUTINE TO DEASSIGN DRIVE IF ERRORS BECOMES EXCESSIVE 


000020 152252 ABNRML: BIT #SWO4, ISWR ;SEE IF SWITCH 4 SET 
BNE 1$ ‘BR IF IT’S SET 
001464 o000S6 CMP MAXER, STOTAL(RO)’ jCHECK TOTAL ERROR VALUE 
BHIS 1S ;BR IF ERRORS DONOT EXCEED MAX 
026574 IMP bROP :DEASSING THE DRIVE 
1S: RTS PC * RETURN 


;ROUTINE TO CHECK FOR END OF PASS AND END OF TEST 


-SBTTL END OF PASS ROUTINE 
JHE HEHEHE 


: KINCREMENT THe PASS NUMBER ( 
IF THERES A MONITOR GO TO IT 
:#IF THERE ISN’T JUMP TO FISK 
SEOP: 
001506 EOP: ISI ENDET : END i ob hss DETERMINED BY SEEKS OR WORDS ? 
000054 001452 CHP SREAD+2(RO), pee ; CHECK 
BHI EOP BR IE’ HSH GREA ER THe CIAL 
oo00s2 001450 CMP AD(RO),ENDCON’ ;CHECK LSW AGAINST LIMIT 
T8801 BHIS Sopa oh TF EQUAL OR GREATER 
000044 O014S6 EOP1: CMP $POSIT+2(RO),ENDSEK+2 ;CHECK MSW OF SEEK COUNT 
Bro OPX Bale rod te ag THAN ‘intr 
oo00042 001454 CMP S$POSIT(RO), ENOSEK <CHECK LSW OF SEEK COUNT 
iowa 001201 EOP2 AUPE OOCALE id TF eA So 
Sieg 000070 ive fa, (SP) Rule ras coun o oes STACK 
1 001344 nove (RO), UNIT ‘STORE THE DRIVE NUMBER eiaberinesaates is 
ee nk: Se EE tae es mat 
ree 000070 001460 CHP SPASSC (RO), pascnt Er AT END OF TEST 
1O440L | beaues TYPE" ORNUR pee wilson 
01374 001344 MOV UNIT, -(SP) 11 SAVE UNIT FOR TYPEOUT 
DRIVE NUMBER 
104403 TYPOS G0 TYPE--OCTAL ASCII 
BYE OO FU PBRESS-CEADING ZEROS 
104401 001201 TYPE SCRLF : OR-LF 
prety ag is sDeRaaIGY, THE ORIVE 
yeaa Spi aad : MOV UNIT, -(SP) ;SAVE UNIT FOR TYPEOUT 
:: TYPE DRIVE NUMBER 





MD-11-O0ZRMB AD/00 


DZRMBA.P11 
p 027076 


- 
TENE S 


ee saiiad 


GQUURRRERES SU RIUNNNG | 


SFSELEFHSRERS VB 





pas 
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27-JUL-77 08:04 


001544 


001212 


001212 


OF PASS ROUTINE 
TYPOS ;;GO TYPE--OCTAL ASCII 
.BYTE 2 ti Type 2 DIGIT(S) 
BYTE O LEADING 
TYPE SCRLF : 
ISR PC, TYPEST ;TYPE THE DRIVE’S STATISTICS 
MOV R3, -(SP) : Se) 
MOV RY; -(SP) : RY 
MOV RO; RY ‘DRIVE’S BLOCK ADDRESS 
ADD #SOPERC, R4 "ADD THE STARTING ADOR OF SECTIONS TO CLEAR 
MOV #8. ,R3 *NUMBER OF LOCNS TO BE CLEARED 
: (ERROR COUNTERS NOT 
2s: CLR (R4)+ “CLEAR THE LOCN 
DEC iE THE LOCATION COUNTER 
pA (SP)+.R4 BR RY bation 
MOV See RESTORE R3 
INC sPAsst (RO) INCREMENT THE PASS COUNT 
* BR EOPX “EXIT 
are aru CLEAR RYE FOR R DRIVE NUMBER 
Arce arpatt cr), asmst vn DR LIST 
ASL RY dl Hi Rive ONT 6 FABLE THDEX 
HOV RO, DUNTT (RY) : PUT OCK ADDR ADDRESS _INTO DROP uot 
BNE E ALL BRIE Yong = 
INC SDEVCT > INCREMENT DEVICE COUNT 
INC :T THE PASS NUMBER FOR APT 
BIC #100000,SPASS  ;AVIOD NEGATIVE NUMBER 
ahh on ie THE PASS NUMBER 
BIC ‘ 90000, SPASS pow vt rity A NEG. NUMBER 
° be 
SEOPCT: .WORD 1 
BGT SDOAGN + YES 
MOV (PC)+,a(PC)+ }:RESTORE COUNTER 
SENDCT: .WORD 1 
SGETH2 Spy . ae42 RO --GET MONITOR ADDRESS 
BEQ SDOAGN ; BRANCH SEONG TF NO MONITOR 
RESET CLEAR THE WORLD 
SENDAD: JSR PC, (RO) ::G0 TO MONITOR 
NOP 3; SAVE 
NOP ::FOR 
NOP *ACTIL 
SDOAGN: 
JMP a(PC)+ ; ; RETURN 
SRTNAD: .WORD FISK 
FISK: INC STESTN ; INCREMENT THE TEST NUMBER IN THE MAIL BOX 
JMP MAINI ‘RETURN TO LOOP 
; ROUT INE TO GET THE REMAINDER OF THE RANDOM NUMBER 
; NUMBER, RS ;DIVISOR INTO RS 
JSR PC, GETREM 
: RETURN ;REMAINDER IS IN RS 


SEQ 0126 





SEQ 0127 


5 STOR geeon NUMBER ON THE STACK FOR DIVIDE 
DIVISOR ONTO THE STACK 
THE RANDOM NUMBERS 


L10 
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THE REMAINDER INTO RS 


THE 
DE 


IvI 


;ADJUST THE STACK POINTER 
;FOR DEBUGGING HALT 


SASASASASA ceri 


'MOVE RETURN UP THE STACK 


’ 
’ 
’ 
9 
’ 
5 
5 
i] 
’ 
’ 
’ 


dentastad Be § 


gas See 
ee 
SSaSSa NSS 


O-MUMTin.or.@o 
at ht tt tt 


is 2 

ao — 
fy ff 
g22 735 Ses 
feat £8 Sz 
SRS ES Bh 
eae : $2 LE 5 
mie ia 
hae i 
Mest sls als 


Fee ee oy oh hod 


JE BERWMEUOUSddeeDEEds 
: é 


em omemomemen sok. oa 


neg 
ee 





3 
i 


55SSILEDS PEL REELS LE TIID 





1 


ae 
Boisdi 
a 
eS 
ae 
Boae0? 
062706 
000? 


Bneree 
eserves 


ba 
< 
a 
ao 


=—NNO 


oO 
bon 
= 
-_ 
o 








END OF PASS ROUTINE 


M.OP41: 


M.DP4e: 


dobar SP Donen 


3 


Bas Bee8 3s 
oa amr 


z 


Mh a 


RS,R1 


8 BBRZ*Bz2LB 
Z 


-. 
~ 
t] 


Ty 
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9 Seg 


EST THE UPDATE. INDICATOR 
TE Teno FORGET IT 


be 


;ADJUST STACK BY 4 WORDS 


= TO REPLACE LEADING ZEROS IN A NUMERIC STRING WITH SPACES 


3 
REP.2: 


1$: 


3$: 


4S: 


MOV 
JSR 


“tos 
Oo 
~ Psy: 


8 z 
~e 


Rea? @Et 


;ADDRESS OF NUMBER (IN ASCIT) 
;’N’ IS NUMBER OF DIGITS TO BE TYPED 


MAXIMUM NUMBER OF DIGITS TO BE TYPED 
I SUBTACT or hh TO FOR INDEX 
eer 9’ 9 


I ADDRESS 
;G0 OR MORE LEADING ZEROS 
j SEE IF ZERO BYTE TERMINATOR 


;PUT ADORESS IN LOCATION FOR TYPEOUT 
SIGNIFICANT DIGITS 


; TYPE NUMERICAL ASCIZ STRING SUPRESS LEADING ZEROS 





SEQ 0128 
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END OF PASS 


SNUMADR . - (SP) *FIRST ADDRESS OF ASCIZ STRING 
"SR JSSLPRS ; 


~(SP) ; RO 
4(5P) RO ‘PICKUP THE POINTER 
1S TSTB —s-_- (RO) TERMINATOR ? 
BEQ ;BR IF 
CMPB ss #0, (RO)+ -IS THIS AN ASCII ’O’ ? 
BEQ i$ *BR IF YES 
2 DEC RO *BACKUP BY ’1’ 
MOV RO, 3S j SAVE FOR TYPING 
DISPLY GO PRINT 
3S: .WORD O *ASCIZ POINTER GOES HERE 
MOV (SP)+,RO iREST RO 
MOV (SP)+) (SP) *RESTORE THE STACK 
RTS PC : RETURN 
;ROUTINE TO TYPE AT PRIORITY 4 
TYPRI4: MOV asPS,-(SP) ; SAVE PRESENT STATUS 
MOV #200; a8PS j CHANGE E PRIORI YT04 
MOV (RS)4, 1§ 
ISR PC, STYPE Tyee Be ite Orccace 
1S: .WORD O SSAGE ADDRESS GOES HERE 
RTS RS RETURN 
ROUTINE TO TYPE ERRORS 
: DISPLY ;MUST DEFINED IN ’TRAP’ TABLE 
: MESADR :ADDRESS OF MESSAGE 
: RETURN 
SOSPLY: BIT G1T13, 2SHR j INNIBIT ERROR TYPEOUT ? 
L tees *SET PRIORITY TO ZERO 
JMP STYPE :TYPE THE MESSAGE 
1S: aod #2, (SP) zo. MENT THE RETURN 
R 
; THIS ROUTINE IS USED TO CHECK IF AN 
“ASCII CHARACTER IS A DIGIT BETWEEN O AND 7. 
: MOV ; ADDRESS OF ASCII CHARACTER 
: JSR Revck OCT CK THE CHARACTER 
: RETURN CHARACTER 18 NOT BETWEEN 0-7 
: RETURNe *CHARACTER IS IN Re AS A 
: :OCTAL DIGIT 
CK.OCT: CPB (R1),#’0 ;LESS THAN ZERO? 
BLO 1$ “YES -- BRANCH 
CMPB 0s (R11), #°7 GREATER THAN SEVEN? 
BHI 1$ ;YES ~~ BRANCH 
MOVB  (R1),Re GET THE CHARACTER 
BIC #tC7'Re STRIP AWAY THE ASCII 
(RS)4 ‘ADJUST FOR RETURN 
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as 030006 000205 18: RTS RS ; RETURN 

6958 ;THIS ROUTINE IS USED TO CHECK AN ASCII CHARACTER 
6959 ;AND DETERMINE IF IT IS A DIGIT BETWEEN O AND 9. 
6960 ; CALL Noy 


Recktec «=| Ceck Te CHCTER 


ee 
i 


6963 RETURN "NOT BETWEEN 0 ao 3 
exe RS = Oe 
6%7 030010 121187 000060 CK.DEC: CMPB (R1),#’0 j LESS THAN ZERO? 
Bae9 Oa0ule isi127 OO0O7! ChB Ts we : TER THAN NINE? 
6 Gauze 151d54 BHI ee “YES -- BRANCH 
bars Gonos Peers coouEo meta Row io ete eect 
p375 fatles Bierte Petes tApgUs 
B34 030034 000205 1S: RTS RS : 
6 THIS ROUTINE ILL CHECK AN ASCII CHARACTER TO 
6377 DETERMINE WHAT IT IS. 
6979 "gs MOV SADR, Ri ;AODRESS OF ASCII CHARACTER 
6 : SR CK. CHR *CHECK CHARACTER 
e 2 : RETURN : ° CARRIAGE STURN (R1)=AOR+1 
b : TURN Prt CORA # ( RI )=AOR+ 
6 : TURN ADRY *PERIOO # (R1)=ADR+1 
6385 : RETURN ADRS *DIGIT AND 7. 
5388 : RETURN ADRS :DIGIT AND 9. 
6387 : ‘RO = DIGIT * (R1)=ADR+1 
6989 030036 105711 CK.CHR: TSTB (R11) ;"CARRIAGE RETURN”? 
6990 030040 001417 Beg 3 *YES -- BRANCH 
6991 O30042 121127 OO00S4 (R1),#’, >= COMMA ? 
6 030046 001413 BEQ 2s YES -- BRANCH 
6 0300S0 121127 Oo000S6 CMPB sR), #” :"PERIOD"? 
6994 030054 001407 BEQ 1$ YES -- BRANCH 
6995 030056 004537 030010 ISR RS, CK.DEC :"DIGIT"? 
6336 000410 4§ NO -- BRANCH 
6 004537 027762 RS, CK.OCT -OCTAL ? 
es Bun bere met iBtehY BEREEY 63 
7000 030074 presse 1S: TST (RS)+ * PERIOD 
7001 005725 2$: TST (RS)+ : COMMA 
70e 005725 38: TST (RS)+ ; CARRIAGE RE 

930102 DoSe01 I ps {MOVE POINTER TO NEXT CHARACTER 
Bi 030106 d00205 RTS rs’ : 

THIS ROUTINE CHECKS AN ASCII STRING FOR LEGAL 

7008 : TERS AND FORMS A DECIMAL VALUE BINARY NUMBER IN Re. 
TOG : MOV #AOR, R1 ;ADDRESS OF ASCIZ STRING 
7011 : MOV #NUM, R2 “MAX. MAGNITUDE OF INPUT NUMBER 
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ORMANCE 
04 


ea sue?? 08:0 
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Pil 


FER OR INPUT 700 LARGE -- R2=? 


Vela ptemen ee 


CK DIGITS 


noe 


; “Fea 


UuNTNworoo 
pen bandon }anhen dan bon bon) 


RRRRRRRR 


3 
& 
8 
: : 
re 
2 be 3 ? s x : 
¥ . A ba fea 
eh z E. * REELS G6 S : 
; is a is 3 ee ake - 
ae ee eee 
cots Say Stuy E89 Sa Ses 
ee ee ne 
are are : 
Soros : & Sead +d ++ ne as 
eS eT 
PS NES INNS. 1 S22 22 SSSSS2FSSSERSLSS ag 
BBS io cinnsrnBdbdeesinnennnr shor bear PeEPEE ES = 


boa be 


LNT ARNG B PSF RHARBYDRLEL 


eh ed me ht dt a Ht ed et 


tutu fututu fututu fututetutefutvtvtvtvivfvtvietetyt aaa 
pu Suyuaseuucudusge stags st aa gud e gas qa aaa ya 
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-Pll 27-SUL-77 08:04 END OF PASS ROUTINE 


NOTE: THE PROGRAM REQUIRES THIS FORM OF ’$S820’, NOT THE VERSION ON 
THE SYSMAC LIBRARY, REV C AND LATER 


: MOV NUMBER,-(SP)  ;PUT THE NUMBER ON THE STACK 
: RETURN sADORESS OF THE 1ST ASCIZ CHAR IS ON THE STACK 
‘NOTE: THE PROGRAM REQUIRES THIS FORM OF ’$SB2D’, NOT THE VERSION ON 
: THE SYSMAC LIBRARY, REV C AND LATER 
1 030272 S$SB2D: 2¢ NUMBER 
farses BiSSa7 BORONS HOV ago a8, Hey mes POinreR 
G30e60 004737 033546 JSR PC, $0820 THE DOUBLE LENGTH CONVERT 
012666 000002 MOV (SP)+, 2(SP) SOT CKUP THE POINTER 
030270 O00e..7 RTS PC * RETURN 
oo0000 1S: ‘ 0,0 

:THIS ROUTINE WILL CONVERT A 16-BIT UNSIGNED BINARY NUMBER TO AN 
; UNSIGNED OCTAL ASCIZ NUMBER. 
: pe NUMBER, = (SP) ;PUT THE NUMBER ON THE STACK 
aE TURN ° i RODRESS OF THE 1ST ASCIZ CHAR IS ON THE STACK 


LUM I 


030276 016637 030322 $SB20 HOV 2(SP) 18, i SAVE THE BINARY NUMBER 
10 Gora? heer JSR BAS eon : ore LENGTH CONVERT 
14 012666 o00002 MOV (SP)+,2(SP) :PICKUP THE PO 
000207 RTS PC *RET 
030322 000000 ooD000 1S: .WORD 0,0 f 
7038 ;KEYBOARD INTERRUPT INITIALIZATION ROUTINE 
7101 : JSR PC, STKINT 
7102 : RETURN 
7104 030326 012737 030356 OO0060 STKINT: MOV SSTKSRV,TKVEC ;SETUP VECTOR 
7105 030334 012737 000100 oo0062 MOV $100, TKVEC+2 §;PRIORITY TO 4 
7108 030342 005777 150614 TST ast’ “CLEAR THE BUFFER 
7107 03034 012777 O00100 1S0604 MOV #81T06,3STKS | ;SET INTERRUPT ENABLE 
7108 030354 000207 é RTS PC ? RETURN 
7110 ;KEYBOARD INTERRUPT SERVICE ROUTINE 
7111 ; CALL 
file : ENTER VIA INTERRUPT 
7114 104410 STKSRV: ROCHR -READ THE KEYBOARD 
7115 Hees 112637 030506 MOVB  (SP)+,5$ GET THE CHARACTER 
711 bese? 030506 000003 CMP S$, #3 :*CONTROL C’ ? 
711 fete 1012 BNE i *BR IF NOT 
7118 130374 104401 001201 TYPE » SCRLF CRLF 
otha 03040 reser, #3000 001360 MOV b-i,C °SET THE ’CONTROL C’ FLAG 
712k 030412 005077 1S0S42 CLR astks CLEAR THE TTY INTERRUPT 
71 S304 02 001154 000176 1S: CMP SWR, #SWREG SOFTWARE SWITCH REGISTER IN USE ? 


att iy oy Om re ns Ot pce’ LE 20 C104) fll 08:07 PAGE 134 SEQ 0133 
BNE 3s 





7124 030425 001024 ;BR IF NOT 
71 030506 000007 CMP , 87 .? G’ ? 

71 BNE BR IF NOT 

71 104401 001201 : : 

71 O4401 TYPE G 2? 4G? 

71 137% MOV PS -(SP) “PUT THE STATUS WORD ON THE STACK 
7130 127% 150470 MOV 82$,-(SP) :RE 

713 150474 CLR asTKs i CLEAR THE TTY INTERRUPT ENABLE 
71 IMP SGTSWR ‘GET THE ret TCH REGISTER ENTRY 

71 1 000100 150462 2S: MOV #100, aSTKS * ENABLE KEYBOARD INTERRUPT 
7134 030476 ooo4de BR 4§ “EXIT 

7135 1o440} 030506 TYPE ,5S ?ECHO THE CHARACTER 

71% 4§ RTI : RETURN 

7138 030506 900000 cs: .WORD O sENTERED CHARACTER 

7140 ;THIS ROUTINE WILL INPUT A STRING FROM THE TTY 

714 : IN s: A FROM TTY 
ats : RON HERE ‘ AbDab Ss oF Ether ROU RACTER WILL BE ON THE STACK 
an : TERMINATOR WILL BE A BYTE OF ALL O’S 
7146 030510 010346 SROLIN: MOV R3, -(SP) ;SAVE_R3 

piu O30S14 | O12703 ! ae mt LEAR OES e EY 

aig ase neta 4g: CMP SST TYINSIO. ,R3 : ? 

7150 101467 BLOS 4S :BR IF YES 

715 10441 ROCHR : CHARACTER FROM THE TTY 
71 11261 MOVB  (SP)+, (R3) : 

71 13 000177 CMPB s«8177, (R3) *1S IT A RUBOUT 

71 BNE S$ BR IF_NO 

71 1 TST (SP) 1S THIS THE FIRST RUBOUT? 

71 001007 BNE 6S ; 

71 1 000134 030764 MOVB = &#’\,, 9S TYPE A BACK SLASH 

71 1 030764 TYPE 9$ 

71 12716 177777 MOV b-1, (SP) ;SET THE RUBOUT KEY 

7160 6S: DEC ;BACKUP BY ONE 

716 030766 CMP R3, #STTYIN >STACK EMPTY? 

71 1 BLO 4§ *BR IF YES 

71 111337 030764 MOVB = (R3), 98 SETUP TO TYPEOUT THE DELETED CHAR. 
7164 04401 030764 TYPE 9$ G0 TYPE 

71 BR GO READ ANOTHER CHAR 

71 16 cs: TST (SP) *RUBOUT KEY SET? 

716 1408 BEQ 7§ BR IF NO: 

7168 10 11 000134 030764 MOVB 3s #’\, 9 TYPE A BACK SLASH 

7169 16 104401 TYPE 

7170 16 CLR tsp) ;CLEAR THE RUBOUT KEY 

717 713 po00e2s 7S: CMPB 3s: #25, (RB) iS CHARACTER A CTRL U? 

71 I 10$ BR IF NO 

71 104401 033314 TYPE SCNTLU TYPE A CONTROL “U™ 

7174 000728 BR 5 :GO START OVER 

7175 122713 000003 10S: CMPB 483, (R3) 1S CHARACTER A CTRL C ? 

7176 BNE 8$ ‘BR IF NOT 

71 77777 001360 MOV #-1, CFLAG ‘SET CNTRL C FLAG 

7178 04401 031000 TYPE SCATLC “ECHO IT 

71793 BR li EXIT 
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END OF ROUT INE 


OZRMBA.P11 A 08:04 PASS 
7180 030662 122713 oo00012 8S: CMPB 0 s«#12, (R3) ;IS CHARACTER A "LF"? 
7181 001011 BNE 3$ : IF NO 
‘16; Bere inal i a ly 
71 t 1 henge *STTYIN it THE INPUT STRING 
sige Gros reat 001200 us: IPE “Fars “1 te pena 
31s 10 t BR i Ave BUFFER AND LOOP 
71 lil 030764 3s MOVB = (R3), 98 fi THE CHARACTER 
71 1 030764 TYPE 95 
71 ie 000015 CMPB 40s, (R3)+ CHECK FOR RETURN 
71 I BNE 2§ LOOP IF NOT RETURN 
71 1 177777 CLRB = - 1 (RB) CLEAR RETURN (THE 15) 
71 JOO 001202 TYPE SLF :TYPE A LINE FEED 
7134 : 11S: ey (SPs pe i CLEAN RUBOUT KEY FROM THE STACK 
713 fea Oe MOV (35) ~(SP) ROiUST STACK AND PUT ADDRESS OF THE 
71 oo0004 oo0002 MOV 4(SP)_2°SP) : FIRST ASCII CHARACTER ON IT 
21 030754 012766 030766 OO0004 a eSTTYIN, 4(SP) 
naa coon Qs: 0 OF Sec FOR ASCII CHAR. TO TYPE 
Fee PBOTEe conte TTYIN: a EEE tO BYTES FOR TTY INPUT 
7203 neta Pee 005015 000 TLC: ty 7*C/<CR> <LF> + OORTROL a 
7205 031006 EVEN 
7206 
Les 
aes zg: REGGE GEL ELGAR ALES RE RRA AERA E RARE ALR A ELAR AAR AAA ERA REE AE 
Zell .SBTTL MACRO ROUTINES 
7e13 .SBTTL ERROR HANDLER ROUTINE 
7215 KSSESAALGREGR REGGAE RASA REA EGRERE AEE E EE KR LEARARARR REL ELE 
7216 SLTHIS ROUT ROUT INE INE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
rte i ERY oo fo SER ERROR —_ catailicsr 
7219 #THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
7220 ?#SW1S=1 HAL 
7221 :#5W13=1 INHIBIT ERROR TYPEOQUTS 
7222 :#SW10=1 BELL ON ERROR 
7223 ; #CALL 
rent 1 ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
722% O31 SERROR: 
7227 031 04407 CKSWR - TEST FOR CHANGE IN SOFT-SWR 
7e8 1 10397 001342 MOV R3, ATTN i dave THE ATTENTION REGISTER CONTENTS 
1 10137 001216 MOV R1; DRIVE ‘DRIVE NUMBER 
7230 O31 032777 O20000 150126 BIT #SW13, ISWR INHIBIT PRINTOUTS ? 
ro Bie Be a el ne 
1 023450 J STIME : TIME 
7233 031 105237 001117 7S: INCB ;;SET, THE ERROR FLAG 
728 031 001775 BEQ 7$ DON’T LET THE FLAG GO TO ZERO 
7235 031 013777 OO1116 150106 MOV STSTNM, DISPLAY ;;DISPLAY TEST NUMBER AND ERROR FLAG 
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7292 031260 104401 + TYPE ; ;;TYPE THE “DATA ; 
rsa BSi5eG RIG) oo1ens EP Oscar pala MeaOee” POINTER one FPEDe 
7B 31 ate cs: HOV {R0),RO j ;PICKUP “DATA pg ABLE” POINTER 
1 1 2e00 6S: MOV (SP)+, RO ::RESTORE RO 
738 o31 1O4401 001201 TYPE aScrLF jj CARRIAGE RETURN” & “LINE FEED” 
0: 1304 5 9 TURN 
7301 O31 01304 MOV @(RO)+,-(SP) —;; 3(RO)+ FOR TYPEOUT 
vey ‘ o44a2 TyPOC ae i360 =-OCTAL ASCIT (ALL DIGITS) 
Bae | O01770 seo CGS tae es a 
o31314 104401 031322 TYPE 48 i TYPE TWO(2) SPACES 
7307 O313e2 Ge040 000 — BS ASCIZ it TuoC2) SPACES 


-SBTTL TYPE ROUTINE 


iROUTINE TO TYPE ASCI? MESSAG MESSAGE MESSAGE MUST TERMINATE WITH AD 
ia] ROUTINE WI A at a CTERS AFTER A Aone FEED. 
ae “Mi TRSERT A TM TMPRER OF TO Gr fizep AS THE PTLER CHARACTER. 

SFILLS CONTAINS NUMBER OF FILLER CHARACTERS REQUIRED. 
HINOTES: SFILLC CONTAINS CHARACTER TO FILL AFTER. 


sassssoos 
WONOUEL WO 


s 


XCALL: 
el) USING A TRAP INSTRUCTION 
TYPE ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


8 


7355 TYPE 
7324 : MESAOR 
7325 : 

1 001173 STYPE: TSTB  STPFLG A TERMINAL? 
7350 {Be as bide IP ves 
7329 000000 HALT give HERE IF NO TERMINAL 
aN GiG0i 1S MOV 3 -(SP) : RO 
7 1 oo0002 MOV adetsP), RO ?:GET ADDRESS OF ASCIZ STRING 
7333 ier? 000001 001224 CMPB 0s BAP TENV, SENV bes a N APT 

1011 BNE 625 33NO,GO CHECK FOR pT CONSOLE 

7335 132737 000100 001225 BITB § sAPTSPOOL,SENVM ;;SPOOL MESSAGE TO 
7338 p01 BEQ 625 $3 iNO.G) CHECK F CHECK FOR r CORGOLE 

1 03 MOV RO, 61S : OR APT 
7338 004 031616 JSR PC, SATY3 :: SPOOL pescnce TO APT 
7 61S: .WORD O +: ME 

O00040 001225 62$:  BITB sAPTCSUP,SENVM ;; 
1 I BNE 60S >: YES, SKI OUT 

72 112046 2s: MOVB = (RO)+,-(SP) + CHARACTER TO BE TYPED ONTO STACK 
734. 001095 BNE 4g :BR IF IT ISN’T THE TERMINATOR 
734 TST (SP)+ 331 TERMINATOR POP IT OFF THE STACK 

012600 60S: MOV (SP)+,RO ORE RO 
7346 16 oo0002 3S: ADD #2, (SP) :;AOIUST RETURN PC 
7347 oooo002 RTI : RETURN 
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4§: A SHT, (SP) ;;BRANCH IF <HT> 
CMPB SCRLF, (SP) ;;BRANCH IF NOT <CRLF> 
aot (SP)+ ;;POP_ <CR><LF> EQUIV 
ins ss A CR AND LF 
a. = + EEO AR EXT CHARACTER 
S$: JSR PC, STYPEC ::60 TYPE THIS CHARACTER 
6S: CMPB SEILLC, (SP)+ $318 My IME FOR FILLER CHARS. ? 
MOV SNULL , - (SP) i3GET a oF LUDA CHARS . NEEDED 
7S DECB =: SP) DOES A NOLL NEED TO BE 9 
BLT ', ‘ BR IF NO--GO POP THE NULL OFF OF STACK 
deca SCHARCN +368 NOT A COUNT 
7$ ; ; LOOP 
;HORIZONTAL TAB PROCESSOR 
STP ee gfe, HERE AR MTTH sree 
031604 ~— BITB #7, SCHARCNT eRe IF NOT AT 
BNE 9S *: TAB STOP 
TST (SP)+ :3POP SPACE OFF STACK 
STYPEC: F318 TPS ::WAIT UNTIL PRI IS READY 
147412 2(SP), aSTPB ;;LOAD CHAR TO BE TYPED INTO DATA REG 
ooo002 CMPB sat :1S CHARACTER A CARR TURN? 
::BRANCH IF NO 
cLRE SCHARC i YES" CLEAR CHARACTER COUNT 
oo0002 1S: CMPB ss LF, O( SP) 7:15 CHARACTER A LINE FEED? 
STYPEX >:BRANCH IF YES 
I (PC)+ COUNT THE CHARAC 
: CHARACTER COUNT STORAGE 


SCHARCNT: . 0 
STYPEX: RTS PC 


-SBTTL APT COMMUNICATIONS ROUTINE 


+ > RESKRERELA LEER A ARERR A AREER AREA ERARR RAE RRE LEAR AREE RL AAREL AAAS 

032054 $ATY1: MOVB  #1,SFFLG ;;TO REPORT FATAL ERROR 
032052 SATY3: HOVE 1, SHFLG -:TO TYPE A MESSAGE 
032054 satya: MOVE 81, SFFLG ;;TO ONLY REPORT FATAL ERROR 

MOV RO, -(SP) ;;PUSH RO ON STACK 

MOV Ri’ -(SP) PUSH R1_ON STACK 

TSTB = SMFLG ::SHOULD TYPE A MESSAGE? 

BEQ cs *:1F NOT: BR 
001224 CMPB  SAPTENV,SENV =}; OPERATING UNDER APT? 

BNE 3$ ;;IF NOT: BR 
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SEQ 0138 
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APT COMMUNICATIONS ROUTINE 
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‘4 
;: goes 
7 J iy 
Eo sf £ @-¢ 
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-SBTTL POWER DOWN AND UP ROUTINES 
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-Pll 27-SUL-77 08:04 POWER DOWN AND UP ROUTINES 
032106 01774% 147042 MOV aSWR, - (SP) ;;PUSH @SWR ON STACK 
032112 010637 MOV SP, SSAVRS :: SP 
eas = 032130 000024 HOV SSPWRUP, JSPWRVEC’:;SET UP VECTOR 
0321 BR 2 ;;HANG UP 
Tt mye SESE SESE SE SESE SESE AEE See AE EEE EEE EE 
032130 012737 O32222 000024 $PWRUP: MOV SSILLUP, J#PWRVEC ;;SET FOR FAST DOWN 
132135 01370 032226 MOV —- SSAVR6, SP ;;GET SP 
<a passse 1s Cue SAR eT Ee ine 
0321 1 BNE 1§ *:0F WORD 
154 012677 146774 MOV (SP)+, ISWR >:POP STACK INTO aSWR 
169 1 MOV (SP)+)R5 POP STACK INTO RS 
ibe 1 fe MOV (SP)+;R4 ;;POP STACK INTO RY 
ie ples my feiss ieee Sm IN a 
176 1sehe MOV (3}3° Ri ; POP ST AeK Ny RI 
172 012600 MOV (SP)+ RO. oh iPoe STACK INTO RO set 
xr - ee 
818435 BeesuB bonose NOV ROMPUNVEC TS PATOL? Te POWER DOWN 
13 Agsaod spurnc: | WORD ie ral SE EE POTTER 
if eats * MOV (PC)+, (SP) j RESTART + Baas 
oeener. P RTI an 
00000 SILLUP: HALT ;;THE POWER UP SEQUENCE WAS STARTED 
000776 ‘ ' BR 2 jj QBEFORE THE POWER DOWN WAS COMPLETE 
OOsois 047520 042527 SPOUER: “ASCIZ <15><12>"POWER™ °” _ 
EVEN 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


55 MESES EE SE SE EEE 9 A SE 
;THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
;#OCTAL (ASCII) NUMBER AND TYPE IT. 

; #STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


3% MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

3% TYPOS ;;CALL_FOR TYPEOUT 

:% -BYTE N ;;N=1 TO & FOR NUMBER OF DIGITS TO TYPE 
3% -BYTE M ;;M=1 OR O 

;# ;; 1=TYPE LEADING ZEROS 

. ;;O=SUPPRESS LEADING ZEROS 
:#S$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
;#STYPOS OR STYPOC 

; #CALL: 

.# MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

:% TYPON ;;CALL FOR TYPEOUT 


3% 
+) teat HERE FOR TYPEOUT OF A 16 BIT NUMBER 





Lil 


SEQ 0149 


27-JUL-77 08:07 PAGE 141 
Aid TYPE 


7 a 
nF 


4 
i ‘ 
WPT t Pog bas 
Bog aes z a, 3 Fi ee pe “5 & 
8 ee ae 6. - &5 Gots § Steam 
Ske, io; g Gets SxS gt Se © iste 
we on gx : ee E 2. a al gerd 
5 tee Wis WEDE LD! Pea qEresgeazg Si py aes 
ye ba hee Pn td Ee 
ioe om as Gotiiiiataes Ge 
= ,€ < 
& TOS. Besse: BFP 3 eens 
 gpseen aa za36, a q gk sites 
2 OURS RMDEWRE Sz RUC ME ORU OSE STENE aE EaNSEN OR! Gco0c 


— <3 


gE pibasdoeneelvebtetcaddstellsuenaeeellGaseabeenaceaess 
BE : 
et nie: 
a see alta PS _ 





RESTO ETOP ETRE TAREE 
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MO-11-D0ZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 142 SEQ 0141 
DZRMBA.P11 27-JUL-77 08:04 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


[popergennsuaneenanenpanqnonsctansstesgiecnscumnonsestenanatss 
THIS ROUTINE IS USED TO CHANGE A 16-B8I1T BINARY eee TO A S-DIGIT 


a He PI NEGATIVE A nA SPace On OR’ amine st sIGh H WILL Be TYPED 


sacra NUM, -(SP) ;;PUT BINARY NUMBER ON THE STACK 
+x :G0 TO ROUT INE 
— RO, -( RO ON ST 
Ri, -( He Ri on T 
Re,-¢ : 
’ 


aaa tea Se errr te PERE 





* MoV 
TYPDS 
1 MOV 
bi otae MOV 
010246 MOV 
Bi beue Nov 
012746 MOV 
CABBRS BL 
BPL 
OEE o000sS 000001 NOY 7 1(SP) OE THE Be NEG 
P $9 
Hos ss OP ime Ne Calla os 
Ban040 MOVB 8’, (R3)+ eT te ET TER TO A BLANK 
2S: CLR R2 $3 THE BCD NUMBER 
032672 MOV SOTBL(RO),R1 THE CONSTANT 
3S: SUB R1,RS tt FORM THIS BCD DIGIT 
BLT 4§ ::BR IF 
Inc Re : INCREASE BCD DIGIT BY 1 
4S§: R1,RS s8 TANT 
atte ae 2800 QAO THE conera 
#21005 BNE S$ 5 EAL 
10571 TSTB ss: (SP?) STILL DOING LEADING 0’S? 
1 BMI 7§ ::BR IF YES 
106316 cs ASLB ss (SP?) MSD? 
1 BCC 6S ::BR IF _NO 
000001 177777 MOVB 1(SP),.-1(R3) 3;YES--SET THE SIGN 
S000 6S: BIS #’0,Re $:MAKE THE BCD DIGIT ASCII 
000040 7§: BIS #’ |Ro *:MAKE IT A Space rif NOT ALREADY A DIGIT 
MOVB Re, (Ra)+ >;PUT THIS IN THE OUTPUT BUFFER 
TST (RO)+ >: JUST INCREMENTING 
000010 CMP RO, #10 CHECK THE TABLE INDEX 
BLT 2s ::GO DO THE NEXT DIGIT 
BGT 8$ ;;G0_ TO EXIT 
MOV RS, Re 3;GET LSD 
6$ GO CHANGE TO ASCII 
108766 8S TSTB s« (SP)+ >:WAS THE LSD THE FIRST NON-ZERO? 
1 BPL 9$ ::BR IF NO 
1 177777 177776 MOVB  -1(SP),-2(R3) ji YES-=SET THE SIGN FOR TYPING 
i 9S: CLRB (R33) 2 :SET TERMINATOR 
1 MOV (SP)+,RS >:POP STACK INTO RS 
726 012603 MOV (SP)+/R3 *:POP STACK INTO R3 
012602 MOV (SP)+'R2 *:POP STACK INTO Re 





11 


MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(10%6) 27-JUL-77 08:07 PAGE 143 SEQ 0142 
DOZRMBA.P11 27-JUL-77 08:04 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE . 
MOV (SP)+,R1 ;;POP STACK INTO RI 
MOV 50h + "RO ;;POP STACK INTO RO 
a 44h oo0004 inte . pt NPY LAYPG ME 
MOV it at. ) 
RTI ;;RETURN TO USER 


SOTBL: 


foo ee be 





SDBLK: .BLKW 4 
.SBTTL TTY INPUT ROUTINE 


‘ENABL LSB 


Me Me He He HE HE He HH HE HE HH a He HH eH Hh Hh hE EE 





ii Set ae gO ATT S aoe gr o-7: — ameaenaneernecenmmee te: 
; SOFTWARE SWITCH REGISTER CHANGE ROUT 


cas “int ra Ph ge ne IN Tie LER gute REGISTER TRAP CALL 





7633 
i 
764 
ree 
764 
7644 
rs 
rey 
re 
022737 000176 001154 5318 THE SOFT-SHR SELECTED? 
103777 146232 ie + OTR THER 
100071 BL SF Bia: No es WAIT AROUND 
a4 Ragas eee (ep) TR ASCII” 
38748 Aaosee ed 87, (SP3+ iH cine Prat } 
001 BNE 1s$ 33 
ig 001150 000001 CMPB ©: SAUTOB, #1 + One ING IN AUTO-MODE? 
7058 l BEQ 15$ ::BRANCH IF YES 
104401 033321 TYPE  ,SCNTLG : ;ECHO THE CONTROL-G (1G) 
i 1 SGTSWR: TYPE SMSWR :: TYPE CURRENT CONTENTS 
3746 naka MOV SWREG, -(SP) G FOR TYPEOUT 
1 TYPOC > 360 =-OCTAL ASCII(ALL DIGITS) 
1 033337 T , SMNEW He FOR SWR 
33000 19$:, CLR =($P) i CLEAR C 
7668 033004 105777 146150 7$ TSTB = AS TKS CHAR THERE? 
033010 100375 7§ :: IF NOT TRY AGAIN 
7 933012 11774 146144 QSTKB, -(SP) ;;PICK UP CHAR 
7e7e 16 042716 177600 BIC ##C177, (SP) ::MAKE IT 7-BIT ASCII 
7674 
Ter 021627 00025 95 CMP (SP), #25 3318 IT A CONTROL-U? 
26 001005 BNE 10$ IF NOT e 
78 104401 033314 TYPE SCNTLU i tYES ECHO CONTROL-U (tU) 
7679 062706 20S ADD 6. SP :T PREVIOUS INPUT 
7580 000757 BR 19$ tier’ S TRY IT AGAIN 
rea 
7683 033042 021627 000015 10S: CMP (SP), #15 ::1S IT A <CR>? 


SEQ 0143 


E 
.! 
cory i Ee 
: & s = ‘ 
2 2 age a un AG Es. E 
“ > wen gea Fo a5 é endten 
| dale ie ae 
S pM, WOOe 83-5 area eeeoewe coe Strgees Sasre, ot, 
Gebietes 10 sede 
wu! jot SESS 
mos ~ Za ae ae oe he 
s Asfoae & & 8 Be fe te 
2 fee : Ge espe ke 5g 
Ry Seaaints 228 sag hei a Se f] § Sseeetresastacress 
5 ¥ 
: yrupet Evan eeengddaetet ae AL pebecnetsEcneatats 
Ha G ea #3... : sea: if 


ORMANCE EXERC 
04 T 
1 
1 
000001 
000100 146046 ' 
000002 
oocoo4 
000004 
o00de3 
000004 O0014C 3$: 


Tt gis 
io a 


RK SENZA NGM SF PRAFASS SL KRSSNG OF if. 
- .=4" BARRE ORR TWO APA \ wy 
Wy ww tele tly OO ww, 1") vw wy 
ww yee, wt be ph we wy 


177776 
001200 
000004 
145750 
45744 
77600 
000004 
145716 
i le 
000021 





SS SET SEPERATE 





? 


BPRPESEO ELE OO RSRSRRARSR tues cen Cnn Gre Pere TEE Er: 


1 my ie roe, + one CERISE oul hatte gle. 08:07 PAGE 14S SEQ 0144 








Oue7bb 000040 000004 BIC #40, 4(SP) 3 IT UPPER CASE 
4§: I ss TO USER 
905015 000 U: -AECIZ /4U/415><12> 3 CONTROL “LU” 
1 000012 : :ASCIZ 7#6/<15><12> 3 ;CONTROL "G” 
905018 053523 Oe0l22 : .ASCIZ <15><12>/SWR = / 
000 
040 O47040 OS3SO0S SMNEW: .ASCIZ / NEW = / 
036440 o00040 
.SBTTL RANDOM NUMBER GENERATOR ROUTINE 
5 SESE SE SEA SESE TE SESE SE SEE SEE SE SE SE J SH a a a a EE 
THIS ROUTINE Is A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 
WITH A RANGE OF O TO 2(+33)-1. 
* ISR PC, SRAND +3 THE ROUTINE 
+r RETURN : RE THE 
i ;;NUMBER WILL BE IN 
i ; ; SHINUM, SLONUM 
SRAND: 
010046 MOV RO,-(SP) ;;PUSH RO ON STACK 
010146 MOV R1,-(SP) PUSH R1 ON STACK 
010246 MOV Re’ -(SP) PUSH Re ON STACK 
913700 033450 MOV SLONUM, RO is SET RO WITH LOW 
be 6013701 033446 MOV SHINUM,R1 ::SET Ri WITH HIGH 
033366 012702 177771 MOV #-7,R2 :SET SHIFT COUNT 
1S ASL RO js SHIFT AND 
1 ROL Ri : ROTATE INTO Ri AND 
INC R2 : CHECK FOR DONE 
033400 001374 BNE 1§ > CONTI FT LOOP 
05.5700 033450 ADD SL ONUM, RO 2: 0 MAKE X 129 
ADC I He CARRY 
033410 063701 033446 ADD SHINUM, R1 ADD NUMBER TO MAKE X 129 
033414 062700 001057 ADD #1057, RO >:ADD LOW CONSTANT 
t o474o1 ASSOC. +t 600 HIGH CONSTANT 
feet yt 033450 MOV RO, SLONUM i SAVE RO 
010137 03344 MOV Ri’ SHINUM He Ri 
O53136 012602 MOV (SP)+,Re2 >:POP STACK INTO Re 
012601 MOV (SP)+/RI ::POP STACK INTO RI 
O33442 012600 MOV (SP)+’RO POP STACK INTO RO 
033444 000207 RTS PC : RETURN 
03344 176543 SHINUM: .WORD 176543 
033450 123456 SLONUM: :WORD 123456 


.SBTTL SAVE AND RESTORE RO-RS ROUTINES 
5 RRMERREREA ERR E EEE EERE EERE ERLE LEAL RL RL ELLE LES EL ELE 
:*SAVE RO-RS 

:# = _SAVREG 

j HUPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 


: TOP=--( +16) 
+ +2---(418) 





SEQ 0145 


Dle 


: 
verge. £6 
e #29 55 ws, 
4 8 te eal 
¢ aaggeeewee e: oo SFae 2 
' pheno tas snesPPeeee Be a BS gest - 
SSSEEESSSS eveevr a) a €& » ny ° 
a oe ol) ee 
: semen = Cees gisg Ete Eee & 
a5 $585 = 8888 bic 5 
3 co ee aS 
sau, «© bbhaooeos Bie ES Stee: 
= wee Cg 
iS weoyey EEBEDEDEREE | b seeeezseese ips By SBBERED 
babi & 23 § eae . 
, rit & oe ieee... fi 
: 
vis ey 
: ee page Be 8 
NS wu — 
3 ge eeenaaas es SCANS 
~ ooo0oooo0o000 onoooooo000o0 =-—O0O0000 


Bene 


RRERE Rees BERR eRReR RR Ree eR MURR UR REE cee ee BERR RRERRREEE 
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Ele 
TH BINARY “TO DECIMAL ASCII CONVERT ROUTINE - paamonainn 





MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MAC 
OZRMBA.P11 § 27-JUL-77 08:04 DOUBLE LENG 
*. J ADDRESS POWER 
Tess t NOV aS thee, 4 polio 
1S CLR + CLEAR PARTIAL 
7855 61401 Sus (RH), RI SUBTRACT TEN POWER 
ree 1 SUB (RS), Re 
7e8 BLT 3$ ;BR_IF TEN POWER TO LARGE ’ 
7860 0: 000772 we 130001 ee 
7h 73. nee 3S: p00 (R4)+, Rd : RESTORE SUBTRACTED VALUE 
i ADD (R4)+,R2 
7oeH « Geese CMP (RS)+’ (RS)+ ;;MOVE TO NEXT TEN POWER 
000060 BIS #°0,R3 1 CHANGE PARTIAL TO ASCII 

res ‘ DEC (Pt)+ + 
7068 4S: .WORD O 

ese eMea «to OR OA TNATOR 

1 aK RESREG i {RESTORE REGISTERS 

145000 STNPWR: 145000 >: 1.0609 
ates . acted Teba6o ;;1.0€08 
ee: oo 10a? 
rar 1100 041100 ;;1.0€06 
7880 74 000017 17 
re Hee ist oo am 
7883 023420 es420 ;;1.0E04 
Bolas re _ 

1 144 144 ;;1.0€02 

7888 033714 000000 0 
7889 1 le fe ;;1.0€01 
733 1 4 ;;1.0&00 
7893 033726 000014 SDECVL: .BLKB 12. ; ;RESERVE STORAGE FOR ASCIZ STRING 
7835 .SBTTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 
7897 $ SLSR AE REELE REALL ASS SRRRREEERRRRERRERA REAR RARER EE 
7898 SLTHIS. ROUT ROUTINE WILL CONVERT A 32-7’ UNSIGNED BINARY NUMBER TO AN 
7899 ; SUNSIGNED OCTAL ASCIZ NUMBER. 
rapt 1 MOV #PNTR, -(SP) ;;POINTER TO LOW WORD OF BINARY NUMBER 
7306 1 JSR PC, as$0820 “CALL THE ROUTINE 
7303 ti RETURN ITH ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 
7905 
7906 033742 104412 $DB20: SAVREG ;;SAVE ALL REGISTERS 
7907 033744 016601 oo0002 MOV 2(SP),R1 ::PICKUP THE POINTER TO LOW WORD 





SEQ 0147 


e 
g. 3g g} » 
se rt a 4 
fw 5. Ee. . 
oe : 
 Gseetie 8, Hoe = Bg z 
@ = gona g=8 we re8 og 88 a3 = 
ee ee a 
: Se eedony Yoh feng freees ee 
Sepggresey es" a i a gserd gy | 
Gated Ol itt be im | 
rene poe sananenen -\.. \qneaponen by: caenanenenen ae ij oaonee iS 
# y : = 
; i an 
Tea 3 - Sew cp o & 4 oS ORG 
et tae y= SE i eae zg : - ge 
SSSEUUSEMNEL LUTRSPSELE LZ 8 S552 guvfene 7 SB; 4 ef 
seppestemuavetcessosscead 2 day" eeredee 4, BRE EF 
: ai gi fetes 2 a 


: ES : : 
—— a Ge 2 
Ce rn 


RRERERERERE RR RRR RARER EERE RR ERER PER PEPE EP EE REPRE EERE 


034116 
16666 000004 o00002 
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Gle 
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il 
Pll  27-SUL-77 08:04 


16 O34104 $TRPAD: .WORD  STRAP2 


0341 
0341 031326 STYPE ;;CALL=TYPE TRAP+1(1 ) Ty pi gd ROUTINE 
oauis2 032264 STYPOC ;;CALL=TYPOC TRAPS CLONHOE) TYPE OCTAL (WITH LEADING ZEROS) 
1 TYPOS ;;CALL=TYPOS = TRAP+3(1 ) er OCTAL ppt ( ING ZEROS) 
1 TYPON ;;CALL=TYPON  TRAP+4(1 ) TAL ( LAST CALL) 
1 STYPDS ;;CALL=TYPDS  TRAP+S(10440S) TYPE DECIMAL NUMBER (WITH SIGN) 
O34132 032762 SGTSWR ;;CALL=GTSWR #$ TRAP+6(104406) GET SOFT-SWR SETTING 
034134 032712 SCKSWR ;;CALL=CKSWR a eh (104407) er Tyee CHANGE IN SOFT-SWR 
TYPEIN CHARACTER ROUTINE 


TYPEIN STRING ROUTINE 


Sautae Gaasic SROcIn :GacLeROCIN Reitiga Hh 
148) RESTORE RO-Re- ROUT 


TRAP+10 
ft bevel (ietaewel Teele 





tug Sasers i NE 
034146 027734 SDSPLY ;;CALL=DISPLY twee ROUTINE TO TYPE ERROR MESSAGES 
000032 STERM=.-STRPAD 
gs ELEELSGGRLEG EEE AEE ELAS AAR DERE SAAR EA AREER E RRA RELA ERASE 
.SBTTL SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 
COPYRIGHT (C) 1976 
‘DIGITAL EQUIPMENT CORP. 
‘MAYNARD, MA 01754 
AUTHOR(S): JIM LACEY/CHUCK HESS/C. CHEN 
3 REE LKR KSASEA SASL LAA ASH RAA AERA AAS RELA LL EAE 
;STORAGE FOR RDS, RMERL, RMER2, AND RMMR2 ON AN ERROR “2” 
sRMERRS "= RMDS’ 
'RMERRS+2 = RNERI 
?RMERRS+4 = RMERO 
:RMERRS+6 = RMMRO 
034150 000000 op0000 oD0000 RRS: . ,0, 
034150 RME WORD 0,0,0,0 


Peer CeeereR eee eS : 





; TABLE OF DRIVE ACTIVE INDICATORS (DRVACT=8 BYTES) 
BODE BR aT) ie Bat VE 12 rive WITH A COMMAND 
: TO IF DRIVE IS ACTIVE WITH AN ERROR RECOVERY OPERATION 
8009 034160 000 DRVACT: .BYTE 0 ;DRIVE 0 
8010 O34161 000 -BYTE 0 ;DRIVE 1 
801 16 990 “BYTE 0 : DRIVE : 
301 1 “BYTE 0 : DRIVE 
801 164 000 “BYTE 0 *DRIVE 4 
sols Gsviee 000 ‘VIE 0 iBRIVE & 
B016 baie? 000 “BYTE 0 ‘DRIVE 7 
8018 ; TABLE OF DRIVE STATUS INDICATORS (DRVSTA=8 BYTES) 
801 sDRVSTA=O IF DRIVE IS OFFLINE OR NONEXSITENT 





Hle 


SEQ 0149 


27-JUL-77 08:07 PAGE 150 


SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 


27-SUL-77 08:04 


Pil 


“yy AO/00, RMO3 PERFORMANCE EXERCISER MACY11 30( 1046) 


3 
# 
fol 
i 
oOonvmOTNwr a: 
LWLWEL & 
ow 
eee 
ant 


~_ 


cocnccos Fag) 


35353535 


SSSS8888 


RERREKRE 


ong ad ed ed eet 


SShEE888 


S 


TORS 
Oe YEON THE DRIVE 
PROGRE 


Soyer Finn 


SSsesees 


ee 


O-uUMT iN wK. 


Seeee ey 


8 4 4 4 Ot 


SSsgggggg 1 


Q0O000000 


Sasssees 


T IS NOT PENDING FOR THAT DRIVE 
T IS PENDING FOR THAT DRIVE 


aun 


33 O-UMTWwr 


22 www 


by 3 Po 


ee 


-_ 


Sessssse 


EBaDEse 


;THIS IS A ONE WORD QUEUE. IT WILL CONTAIN THE ADDRESS OF 
;"DP6” OF THE 1/0 OPERATION. 


; TRANSFER WAIT FLAG (TRNSWT=1 WORD) 


Bee ne 


Ile 


O-11-0ZRNG A0/00, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 151 SEQ 0150 
DZRMBA.P11  27-JUL-77 08:04 SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 
Fate mcm ‘etemntssmartatmen tie 
a0 : MMIS 15,8 ONE ? THAT W al Y FOR EACH OF 
308C i THe DRIVES Te EE A SEARCH ¢ CONAN FOR THE 1/0 
8081 REQUEST THAT IS AT THE TOP OF THEIR 
g08¢ EACH DRIVE IS Ase ICNeD ONE BIT, STRING at Sard FOR DRIVE 0. 
goes 034232 000000 SRCHWT: .WORD O 
8086 ;RMO3 DRIVER ACTIVE FLAG (ACTORV=1 BYTE) 
8087 sACTDRV=0 IF DRIVER IS INACTIVE 
*ACTDRV)O IF DRIVER IS ACTIVE 

p 034234 000 ACTORV: .BYTE 0 
8092 ;SOFTWARE TIMER ROUTINE ACTIVE FLAG (ACTSTR=1 BYTE) 
8093 : sACTSTR=0 IF SOFTWARE TIMER ROUTINE IS INACTIVE 
8094 “ACTSTR>O IF SOFTWARE TIMER ROUTINE IS ACTIVE 
ee 034235 000 ACTSTR: .BYTE O 

;UNLOAD FLAG (ULDFLG=8 BYTES) 
F G=0 IF NO UNLOAD COMMAND 

81 ;ULDELG>G IF UNLOAD COMMAND IN PROGRESS 
gl : IF UNLOAD C N WAIT QUEUE 
8103 034236 000 ULDFLG: .BYTE 0 ;DRIVE 0 
104 034237 000 .BYTE 0 s DRIVE 1 
1 O34 999 “BYTE 0 : ORI 
ie aes ane Ie 3 
te 243 000 “BY 0 ‘DRIVE 5 
8109 P44 000 .BYTE O “DRIVE 6 
8110 034245 000 .BYTE 0 ‘DRIVE 7 
Bile ;LOOK AHEAD COUNT (LACNT=8 BYTES) 
ails sLACNT WILL INDICATE THE NUMBER OF LOOK AHEADS PERFORMED 
ll 000 LACNT: .BYTE 0 :DRIVE 0 
aM we ee 
1 000 BY 0 ;DRIVE 2 
8118 034251 000 -BYTE 0 ;DRIVE 3 
1 909 .BYTE 0 -DRIVE 4 
1 “BYTE 0 ‘DRIVE S 
lel 000 -BYTE 0 “DRIVE 6 
Bice 034255 000 .BYTE 0 :DRIVE 7 
gict ;SAVE REGISTERS FLAG (SAVEFG =1 WORD) 
1 ;SAVEFG <O IF SAVE THE RH70/RMO3 REGISTERS WHEN THE 
8126 j OPERAT ION, Is COMPLETED AS PER (DPB+14). 
Bt ioaver GD VE THE RH70/RNO3 REGISTERS, AS PER 
eI +14), Ie ER AN ERROR 
8130 034256 000000 SAVEFG: .WORD 0 





SES 0151 


27-JUL-77 08:07 PAGE 1Se 


PORT RH70/RMO3 DRIVER (REV 1.0) 


Jle 


Y11 30(1046) 


z 
: : 
& ire 
ae 
Bey = Ped vp os 
: - - 
Tn: s & Pe 
4 = Bd io 
Me ag _ bot 8 
BEG fe Bog 8s 
gee 3 > an “ees See 
ae go Si cerca 
on Sa a 4 ge 4 
vhs Gp Seseeeys Sie BY seus FE SG : 
ae: ee ees Fels Fe es a Z- 
sai8y 1S if obs me Hes 2: 
s3ec8 TSG TUTTI BAST Ege war SRPER Fy om BGs od a 
- 534 9 Gum ww ze = 
seen © H Genenege G2) ¢ = cer Eg eb eg 
_ E F “ere oe 
pat ALTE 


; SEEK F 
SEEKFG: . 
TIMEOUT 

MER 
MCPEMX: .WORD 
MXLACT: 


DTUW: 


RMADR: 
RMVEC: 


’ 
T 
’ 


SeBsse9h 


SEREESS 


tm et ot Ht tt 


Beso sates 
Been een 


BRBBBRBBS SS SF PPS PF RAKRARR AN SSSGSSSGBORA RR ER LR BoD owe 


hh tt dt tt tt od 
DOMOMMOMDMVMMMWM DMMMDMDMMD OOD MDMDDDOMMMDMVDWMMODMHO DWDHMWMMMMDWMMDMMWMDOMOMMMDOMOMD 


034260 177777 
034302 177777 
034314 000003 

316 176700 
034326 001000 
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DZRMBA.P11  27-JUL-77 08:04 
te 
8190 034330 000200 
is 
He 034332 000005 
8195 
819% 
81 go0000 
8198 oo00ge 
8199 000004 
8200 000006 
BSp Bo0gts 
8504 00016 
g00d20 
ae 
o00026 
eei0 rine 
515 D0004e 
Bois boots 
Bel o00046 
8218 
8219 
8220 


8S 


SR SSS IRAE SSS NONISS 


dscerneenass 


1273? 000240 177776 


SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 
;MINIMUM DELTA DELAY IS 2 SECTORS (MNDLTA=1 WORD) 


MNOLTA: .WORD 2%64. 
;MAXIMUM SEARCH FOR 1/0 WINDOW IS 5S SECTORS (MXWNDW=1 WORD) 


MXWNDW: .WORD 5S 
;DEFINITIONS OF THE RH70/RMO3 ADDRESS INDEXES 


RMCS1=0 sCONTROL AND STATUS REGISTER #1 (DRIVE REG. 00) 
RMWC=2 ;HORD COUNT REGISTER (NOT A DRIVE REG) 
RMBA=4 *UNIBUS ADDRESS REGISTER (NOT A DRIVE REG) 
RMDA=6 ‘ Sateoe Estes: Tee eet etre CORTVE aes: 0S) 
res Sie, ERROR AGT mes a1 ( ve Res 0 _ 
RMAS=16 :ATTENT Me soe NS Gi (DRIVE REG. 04) 
RMLA=20 iLO (DRIVE pe 
RMOB=22 :DA R NOT 8 OR 
RMMR 1 =04 ae We REG. S54) 
RMOT=26 3OR 
= - me Geer 10) 
RMOC=34 : DESIRED GISTER (DRIVE REG. 12) 
RMHR=36 iran G IVE REG. 13) 
RMERS=42 VE REG. 15) 
RMECI=44 fECC SRR RST STON REGI SrSteR (DRIVE REG. 16) 
RMEC2=46 SECC PATTERN REGISTER (DRIVE REG. 17) 
;RH70/RMO3 DRIVER INITIALIZATION CODE 
THIS ROUTINE WILL DETERMINE WHICH RMO3 DRIVES ARE 
j AVAILABLE FOR TESTING AND SET THE DRVSTA INDICATOR 
STATE FOR EACH DRIVE. 
‘NOTE: THIS ROUTINE CALLS DRVINT 
* CALL 
: ISR PC, RMINIT 
$ RETURN 
"NOTE: THE ’P’ OR ’L’ CLOCK MUST BE STARTED 
RMINIT: SAVREG 
MOV aaPS, -(SP) ‘SAVE SAVE THE PRESE SENT PROCESSOR STATUS 
HOV 8<(S#32.)>. aaPS PRIORITY T0_§ 
TA, FN Bitte Pe 
MOV 8SEEKFG, Re 
1S: CLR (R1)+ : a 
CMP R1,Re iE WE DONE? 
BLO 18 ‘BRANCH IF NO 
MOV #OTUW, Re LAST ADORE 
2s: MOV 8-1, (RL)+ : INITIALIZE 
CMP R1,Re : DONE? 
BLOS 4s oS LOOP IF NO 
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VE TYPE INDICATOR 


;SET ALL DRIVES TO OFFLINE 
;SETUP THE RH70/RMO3 VECTOR 
RO - RS 
EXIS 
ti 
AND 
ON. 
OF RH70/RMO3 (RMCS1) 
BY A 
§ ROUTINE 
SERVE IVE STATUS TO OFFLINE 
“SEE IF DRIVE AVAILABLE 
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DZRMBA.P11  27-JUL-77 08:04 SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 
pe 001750 BEQ  DULP ;BR IF DRIVE NOT AVAILABLE 
7 041204 JSR RO, RO. RI ;READ THE DRIVE TYPE REG. 
FIC 
Ie 8s ;ERROR RETURN ADDRESS 
p40 01 MOV (SP) +, RS ;PUT ORIVE TYPE IN RS 
; ggg004 034200 MOVB  S4,DRVTYP(RI) ;SET RMO3 INDICATOR 
HG! Cie 820024, RS SINGLE PORT RMOS ? 
Ma: o24024 CMP = $4024, RS RMO3 ? 
2 BEQs oS ;BR IF YES 
eke 177777 034200 HOVE —S-1,DRVTYP(RI) SET INDICATOR TO "OTHER’ 
000121 28: MOV 8121,-(SP) ;00 A “READ-IN PRESET™ 
700 041360 JSR » WRT. 
704 RMCS1 
706 8s 
7 MOV 


8888 
Rss 
Se ye 

ze 

z 

e. 

g 
as 
Pa] 
rete 
re 

% 

a 

3 

8 


Er 


e 1 18 ug : F ATA=0 
116164 034304 000016 MOVB ATABIT(R1),RMAS(RY) ; jCLEAR AT RTTENTION BIT 
041204 JSR RO, RO. RM :FINO OUT WHY ATA= 
14 MERI 
1 ROL (SP)+ :IS IT UNSAFE? 
! BPL 4§ :BR_IF NOT 
1 177777 034170 MOVB &-1,DRVSTA(R1) SET UNSAFE INDICATOR 
nett 4§ an Be aes DPR, DRY, AND VV 
ieSiee paasee 167077 gfe sfccerrizzerroesbhi atin RS” 
rest 000001 03417 ote = DRVSTA(RI) OR rete nok DPR TO Ont fre “ase 
G ; 
bo6720 6S: Ist (RO)+ Be OER FHE ERROR 
035014 Ooes01 7$ ASL Ri t ENANGE INDEX TO ADDRESS WORDS 
035016 12761 003720 034262 HOV #2000. »TIMER(RL)’ | START e SEC TIMER 
Wess 177777 034210 MOVB a DPINT(R1) SET PORT INITIALIZE INIDICATOR 
1 QS: MOV (SP5+,R5 ;RESTORE RS 
RTS RO “EXIT 
;REQUEST PRE-PROCESSOR-HANDLES SUBSYSTEM REQUEST 
*CALL 
: ISR RO, J#RMO3 ;CALL THE RMO3 DRIVER 
: PNT “ADDRESS OF POINTER OF DRIVES PARAMETER BLOCK 
: RETURN *RETURN HERE IF QUEUE IS FULL 
: *RETURN HERE IF REQUEST IS IN QUEUE OR THERE 
1S AN ERROR CONDITION 
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~ SINGLE/DUAL PORT RH70/RMO3 ORIVER (REV 1.0) 
177% RMO3: nov a8 ,-(9P) sSAVE_ THE CALLING STATUS 
77776 2 » DON’ Ss 
a) RS i ll 
{BoRahe ip 1 Ye ERROR TRB — 
000016 POR BRR aR ee rien stn fh 
MOVE . (Re), Ril *PICKUP THE DRIVE NUMBER 
ne ya Moye BADE ARM MERC ones Srarus 
034236 oere  CRDFLGCRI? TT ceeeno'IN QUEUE? 
BNE BRANCH YES 
034210 TST8 OPINT(RI) i TRYING ag INIT THE DRIVE 
’ ; : 
034546 is DRVINT Be fhrt THE DRIVE 
034170 TSTB ORVSTA(RI) Hs DRIVE. STATUS ONLINE? 
034220 1S: att (RL) OUTSTANDING PORT REQUEST FOR THE DRIVE ? 
BOBS emccocnuy SELECT TH 
900930 Jar RQ, Dr ‘Bute uM Ma IN QUEUE 
*QUEUE 15 FULL 
000103 o00002 CHP 8103, 2(R2) . THIS. REQ. FOR AN UNLOAD? 
77777 034236 MOVE 3s 8-1 LG(RL) ; ° N QUEUE” FLAG 
454160 2S: TSTe  DRVACT(RI) PET nuts peive ACT ive? 
BNE 85 BR IF YES 
035332 ISR PC, OPT “CALL THE OPTIMIZER 
120000 000016 3S: HOV SgITIS!BIT13, 16(R2)_;SET THE “UNLOAD IN QUEUE” ERROR FLAG 
036412 4g: ISR rBC,CI? :GO HANDLE THE PARITY ERROR 
042326 SS: ISR RO, DRVQUE ;PUT REQUEST IN QUEUE 
000100 BIT ITO6, (RY) fay T 7 
041664 ISR PC, SET. IE ‘SET THE INTERRUPT 
BR ag j RETURN 
034170 6S: STB DRVSTACRL) : F DRIVE OFFLINE OR UNSAFE 
1 000016 MOV 8BITIS!BITI4, 16(Re) iget OFFLINE ERROR INDICATOR 
034 iste DRVTYP(RI) See ft OFFLINE OR NONEXISTENT 
100002 000016 MOV SBITIS!BITO1,16(R2) _;REPORT DRIVE NONEXISTENT 
BR 8S. -GO 10 EXIT 
110000 000016 7S: MOV SBITIS!BIT12,16(R2) ;DRIVE IS UNSAFE 
8S: RESREG RESTORE RO - RS 
TST (RO)+ : OR NORMAL RETURN 
“ BR 10$ * FINISH THEN EXIT 
9s: RESREG RESTORE RO - RS 
10$: TST (RO)+ j CORRECT ss . 
034234 CLRB = ACTORV : “ACTIVE DRIVER” FLAG ‘ 
177776 MOV (SP)+, a8PS “RETURN "PS" TO USER LEVEL ° 
RTS RO *RETURN TO CALLER 
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Pll 27-JuL-77 08:04 SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 
1 
15 ;OPTIMIZER-CALLED FOR A PARTICULAR DRIVE 
1S * CALL 
1g : MOV SORVNUM, RI ;DRIVE NUMBER TO R1 
1? : ISR PC, OPT rte A COMMAND 
19 035332 lowe OPT: § SAVREG sat ;SAVE RO - RS . 
1461 AEA: 034232 ete aPPstTiRi) SACHETS 1 FLAG 
105061 034220 CLRB § DPROS(R1) » RESET PORT REQ FLAG #44 
004 o4e402 JSR PC, GETREQ GET “DPB” POINTER OF REQUEST 
135.58 O08 708 iT Re 1 A Ae TIN QUEUE? 
035362 O10164 0000 MOV R1,RMCS2(R4) ;LOAD THE DRIVE ADDRESS sexxeex 
C3566 O1e7eM 000111 900000 MOV 1 RMCS1(R4) ;CLEAR I 
44 000000 BIT s81T11, RMCS1(R4) : ¥ 31 . se 
et i076 034170 10S: fete pron, + Prove OM The?’ 
ate 004737 o424e4 JSR PC, POPQUE iNO--REROVE REQUEST FROM QUEUE 
035416 Ol2762 140000 000016 MOV set TStBITI4, 16(h Set OFFLINE | TEST TATLS/ ERROR INDICATOR 
pes tego ge get) oe El 
1 BPL pevs 0 EXIT IF NOT 
035432 012762 110000 OO00I6 MOV #BITIS!BIT12, ihe) jSET UNSAFE STATUS/ERROR INDICATOR 
035440 000447 - BR 8$ 0 EXIT 
. HOV #111, -(SP) ;LOAD COMMAND ONTO THE STACK 
Pe _ iam ee REcicTER INCRE 3 
: BIT sBITLL, (RY) ORI AVAILABLE ? 
o3s442 122762 000150 oo000e ” CMPB ss #150, 2( R2) fe Tete REQUEST FOR 1/0? 
Saeuee eyes os he 035776 a be CI4¥ ite ne co INITIATOR 
B35456 O00440 gs’ geen To Be ‘IT 
035460 005737 034302 2$ TST OTUW ‘DATA TRANSFER 
035464 00201 4§ *YES--GO_START Mee CER 
Gass : 034260 Ist SEEKF 300 _1 SEEKS? 
74 004037 036746 JSR RO,LA * NO-—DO LOOK AHEAD 
000427 BR a$ *RETURN HERE ON A PARITY ERROR 
000403 BR 4§ GO START A SEARCH 
004737 035570 3S: JSR PC,CI1 :START A DATA TRANSFER 
19 000423 BR 
035512 004737 035676 4§ JSR PC,CI3 START As SEARCH 
ea 177777 o34220 SS: MOVB 8-1,DPRQS(R1) ;SET PORT REQUEST INDICATOR 
0103 MOV R1,R3 *SET UP TO ADORE 
Bhesos ASL R2° CONVERT TO NDEX 
012763 023420 034262 HOV #10000. J TIMER(R) STAT 10 SEC TIMER 
rites 036412 6S: ISR PC,C “PROCESS THE PARITY ERROR 
035546 032714 000100 7§: BIT bt oe, (RY) “SEE IF ’IE’ ALREADY SET 
035552 001002 BNE BS BR IF SET 


SRR ERP RO URODOTO SS SER TORES 
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CALL 
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;SET “IE” WITHOUT A “TRE” 
iRES ' PROC. STATUS 


;ORIVE NUMBER 
i ADDRESS OF OPB 
iCI?= CI1,CI3, OR CI4 
ich TA TRANSFER 
CI2=SEARCH REQUESTED BY DATA XFER 
: CI4=NOT DATA TRANSFER 
; REMOVE REQUEST FROM “DRIVES WAIT” GUELE 
QUEUE 


Dep pouess 10S WAIT 


SELECT DRIVE 
jDEST WORD COUNT 


:LOAD WORD COUNT 


itRSS SLETOR ano Tan 


CALL THE LOAD(WRITE) > Sg 
ees Eee s 


;LOAD CYLINDER ADORESS 


;LOAD “COMMAND+GO", “AL78A16", AND “PSEL™ 
;SET “DATA TRANSFER UNDERWAY™ 

;RMCS1 ADDRESS 

. CT DRIVE 

;DESIRED CYLINDER ADDRESS 


; PICKUP re ADDRESS 
;BACKUP BY MAX. SEARCH FOR 1/0 WINDOW 


;COMBINE THE ADJUSTED SECTOR WITH 
: OSsI XENTED BITS ,IF ANY 


;LOAD DESIRED TRACK & SECTOR 


;START A SEARCH 


SEQ 0157 
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Te A ener commen? 


;SET “SEARCH WAIT” KEY 
;LOAD DESIRED TRACK & SECTOR 
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118: 
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CI?: 
1$: 


CI7B: 
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BIT 


IT A_“GET REGISTER” COMMAND? 


— 
= 
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10$ —_ : F NO 

6(R2),R3 yt 0 1ST ROORESS, 

10(R2) * INIT Te NeeN DR Tr THE FIRST REG. 

10(RS) ae if ARES TO 

RO, RO. RM * READ RE 
: INDEX OF REG. TO 

(SP)+, (R3)+ oo Leno REG. 

es Es ig 

as’ 

#145, R3 if Ist A "SELECT DRIVE” COMMAND? 

R3,-(SP) 

RO, WRT. RM 

POPQUE 

Bot ror TE (R2) ier Te TEBE Br 

SAVEFG : SAVE RO /RACS REGISTERS? 

3s ‘BRANCH IF NO 

PC, SVRH70 YES--GO SAVE THE REGISTERS 
“RETURN TO USER 


1 
; rrncaieiaetaaas ;SET A ONE SECOND TIMER 
#1,DRVACT(RI1) 3 SET THE DRIVE ACTIVE 
PC’ TURN TO THE USER 


R3,-(SP) {LOAD THE 
RO; WRT. RM 
CIS 
#B1T12,RMCS2(R4) _:DRIVE NON-EXISTENT ? 
cI BR IF YES 
Re “ANYTHING IN QUEUE ? 
ci7B *BR IF NOT 
#B1T15'BIT11, 16(Re) ;SET “PARITY ERROR INDICATOR 
PC. SVRH70 GO SAVE’ THE RH70/RMO3 REGISTERS 
#i11,-(SP) -DO A “DRIVE CLEAR™ 
RO, WAT. RM 
PC, EMPTYQ sEMPTY THE QUEUE 
ULOFLG(R1) ‘CLEAR THE UNLOAD IN QUEUE FLAG 
DRVACT(R1) :DRIVE IS IDLE 
Ri, DTUW IF THIS DRIVE HAD AN I/0 REQUEST 
1§ *IN PROGRESS CLEAR ALL OF THE FLAGS 
TRNSWT 
#-1, OTUW 
;SAVE RO - RS 
#BIT12,RNCS2(R4)" ;IS *NED’ SET ? 
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Pll  27-JSUL-77 08:04 SINGLE/DUAL bor? Shy ORT VER (REY 1.0) =e 0160 
036528 001002 BNE 1$ :BR IF YES 
005001 CLR Rl 
034160 is iB pavacT«RL> BRIVE IVE? 
1 MOV : ° ER WAIT" QUEUE 
020137 034302 CMP Ri, DTU DID THIS DRIVE HAVE AN 1/0 IN PROGRESS? 
001402 » BEQ ; YES 
136 o424a2 + JSR PC, GETRE@ : THE DPB POINTER 
136 2s: TST Re j QUELE FOR DRIVE ? 
O36556 141 BEQ 4§ *BR IF NOT 
03656 010000 000010 BIT #81T12, RMCS2(R4) "NED. ? 
p3esee O01 .  BEQ ;BR I 
0365 1 100002 000016 MOV #BITIS!BIT01,16(R2) ;SET "DRIVE NON-EXISTENT’ INDICATOR 
ee Ry an 
036600 O01 102000 O00016 3S: MOV 8BITIS'BIT10, 16(Re) ;SET “NON-CLEARABLE PARITY” ERROR INDICATOR 
5606 004737 04 JSR PC ; REGISTERS 
ble 012763 1 034262 4S: MOV a-1 TIMER(R3)  ;STOP THE TI 
bbe «105061 034160 CLRB  ORVACT(RI) -SET “DRIVE ACTIVE” TO IDLE 
137 034302 CMP Ri, DTU IS THIS DRIVE SETUP FOR A TRANSFER 
1008 BNE *BR IF NOT 
1 177777 034302 MOV 8-1, DTUW *RESET THE INDICATOR 
005037 034230 CLR “CLEAR THE 
1 236 Ss: CLRB  - ULDFLG(R1) CLEAR UNLOAD FLAG 
10000 000010 BIT #BIT12,RMCS2(R4)' :"NED’ SET ? 
1021 BNE 6$ ;BR IF YES 
Geese Geers INC Rl *MOVE TO THE NEXT DRIVE 
CSceee 1 seen BIC ##C7,R1 
036672 1316 rea BNE 1S otha ; BRANCH IF MORE DRIVES 
bree 4303 CLR TRNSWT : , IT’ QUEUE 
004 042230 JSR PC, CLRQUE *CLEAR ALL OF THE REQUEST QUEUES 
0367 o1e764 000010 MOV sgt TOs, RCS2(RY) i008 MASSBUS INIT. 
‘ BR ; CONTI 
036 004737 042306 6S: JSR PC, EMPTYQ : DRIVE’S QUEUE 
036726 105061 034170 CLRB = DRVSTALRI) *SET DRIVE TO OFFLINE 
O36? 3 issv6l CLRB  DRVTYP(R1) :CLEAR THE DRIVE TYPE INDICATOR 
0367 737 041664 7S: JSR PC, SET. IE *SET “TE™ WITHOUT “TRE” 
036742 104413 RESREG ‘RESTORE RO - RS 
036744 000207 RTS PC ? RETURN 
;LOOK AHEAD ROUTINE 
; CALL 
2 : JSR RO,LA GO CHECK THE WINOOW 
| : RETURN “ERROR RETURN 
. RETURNe “START @ SEARCH 
: RETURNS START A DATA TRANSFER 
036 01 034316 LA: MOV RMADR, RY GET RMCS1’S ADDRESS 
G3e7se 010164 o00010 MOV Ri, RMCS2(R4) elec BAIVE 
756 7 041204 JSR RO; RO. RM "READ DRIVE STATUS 
036762 000012 RMOS 
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DZRMBA.P11  27-SUL-77 08: SINGLE/DUAL PORT RH70/RMO3 LRIVER (REV 1.0) 
14 4§ “ERROR RETURN ADDRESS 
as nega’ Raohte 157577 BIC #¢C020200, (SP) ;ON CYLINDER? 
8694 CMP #200, (SP)+ spree Gerad? 
Pree LACNT(R1) INCREMENT THE LOOK AHEAD COUNT 
8697 CMPB §_ LACNT(R1),MXLACT ;EXCEED MAX? 
S65 BGT 2s ; IF YES 
86 MOVB  10(R2),R3 *GET DESIRED SECTOR ADDRESS AND 
8700 SWAB.StiézRD "MULT. BY 64--ALIGN WITH 
ae Bak R3 *LOOK AHEAD REGISTER 
MOV #340, a8PS ;PRIORITY LEVEL "7" 
es 6S: JSR RO, RD. RM “READ LOOK AHEAD REGISTER 
i = 
8707 CHP (SP), RALACRH) ;CORRECT LA NUMBER ? 
Ha st (SP) *NO, CLEAR STACK 
erie 7S: SUB (SP)+,R3 ;CALCULATE THE DELTA 
871 ADD #(32.%64.>,R3  ;MAKE THE DELTA POSITIVE 
e714 02370 1S: CHP MXDLTA, RS i CHECK THE DELTA TO SEE 
Eb A Be coc Bono Ghee 
6718 Saris 105061 034246 2s: CLR LACNT (RL) “AND TAKE THE 1/0 EXIT 
5548 110 005720 3S: ny (RO)+ j ADJUST THE RETURN ADDRESS 
Hee reat eared 036412 4§: ISR PC,CI7 *PROCESS THE ERROR 
B7e3 120 000200 cs: RTS RO * RETURN 
8725 ; INTERRUPT SERVICE ROUTINE 
e784 ot 118732 000001 034234 ISR:  MOVB : #1, ACTDRV SET “ACTIVE. DRIVER” FLAG 
132 013704 034316 Sov . RMADR, RY BOO RE SS OF RHSCS1 
8730 037136 013701 034 MOV DTUW, RI ‘GET “DATA TRANSFER UNDERWAY” INDICATOR 
142 BLT 1$ “BRANCH IF NO DATA TRANSFER UNDERWAY 
rh eed 037166 JSR PC, TD i CALL TRANSFER DONE 
Brae Paotes PBiGis CS7HNe te: Reereg Or Cut SPECIAL CONDITIONS 
8736 037160 105037 034234 . CLRB  ACTDRV “CLEAR “ACTIVE DRIVER” FLAG 
ee 037164 o00002 RTI : RETURN 
8740 SER SE HOT 
8741 037166 105061 034160 TD CLRB  DRVACT(RI) ;SET DRIVE ACTIVE INDICATOR TO IDLE 
aris O3717e o1e737 1 034302 HOV $1, 0TUM :NO DATA TRANSFERS UNDERWAY 
8744 012761 177777 034262 MOV #-1,TIMER(R1) | ;CANCEL TIMEOUT 
8745 037210 O0620t- ASR RI 
B74 037212 Ol 034230 MOV TRNSWT, Re ;GET “DPB” ADDRESS FROM THE 
8747 037216 034230 CLR TRNSWT “TRANSFER WAIT QUEUE--CLEAR QUEUE 
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08:04 SINGLE T RH70/RMO3 DRIVER (REV 1.0) 
p00200 oc00i6 BIS #B1TO7,16(R2) — ; SET _DONE 
MOV R1,RMCS2(R4) SELECT THE DRIVE 
041204 ISR RO; RD. RM TRANSFER ERROR( TRE=1)? 
RMCS1 
CI7 
ROL (SP)+ 
BMI 3$ BR IF_YES 
034256 TST SAVEFG : SAVE RH70/RMO3 REGISTERS? 
BPL i$ ?BRANCH IF NO 
041546 ISR PC, SVRH70 > YES REGISTERS 
1S: JSR PC He HK ; F WRITE CHECK TO BE PUT IN QUEUE 
JSR PC; GETREQ ;GET DPB 
TST Re -ENTRY FOR DRIVE ? 
BEQ 2§ ‘BR IF NOT 
035332 ISR PC, OPT CALL OPTIMIZER 
THE RELEASE DRIGE IS F SE CENT OEE DUAL PORT OPERATION 
000113 2s: MOV #113, (RY) Ne LTE DRIVE 
00100 O00016 3% Bs Tees 'BITOS, 16( SET Far ee 
see RUS. PILE OF we 
BMOT IT as ta 
000113 MOV #113, (RY) cae Se 0 DRIVE 
BR Sc : CHECK Fon OTHER DRIVE 
000002 000024 WC.HK: CMPB  #2,SCODE(R2) | ;LAST OPERATION WRITE DATA ” 
BEQ 1$ ‘BR IF IT WAS 
000003 000024 cHPe #3, SCODE(R2) ;LAST OPERATION WRITE HEADER & DATA ? 
042326 18: ISR RO, DRVQUE PUT OPERATION IN THE QUEUE 
: 
000016 CLR 16(R2) “CLEAR ’DONE’ BIT IN DPB 
gone 000027 MOVB 31 (Re) spreve (Re) - SAVE WRITE 0 OPERATION CODE 
eet eviee NOY $7 (RB)? Re) hte Ee RHEE Tha OD TRACK ADDRESSES 
000002 000024 BICB 82, SCODEtRe) ; CHANGE WRITE TO CHECK 
00000; BIC n (R2) :CHANGE DRIVER CODE TO WRITE CHECK 
10 00000¢ BI 810, (RO) FINISH ING CODE TO WRITE CHECK 
2s: RTS PC * EXIT 
SPECIAL CONDITION ROUTINE 
000016 SC: MOVB §_RMAS(R4),R3 ;READ “RMAS™ 
:BRANCH IF ANY ATA’ BITS SET 
041204 ISR : RO, RO. RM READ CONTROL AND STATUS REGISTER 
ere 
(SP)+ 31S “IE"=1? 
BMI 1$ *YES, NO DRIVES TO CHECK 
ERROR 1 ?REPORT AN ILLEGAL INTERRUPT 
041664 J PC, SET. IE ‘SET INTERRUPT ENABLE 
1$: RTS PC ;RE 
2g: CLR -(SP) :PROCESS ALL DRIVES THAT HAVE 
MOVB RB, (SP) AN “ATA*=1 
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SINGLE/DUAL PORT RH70/RMO3 DRIVER (REV 1.0) 


SEQ 0163 


-77 08:04 
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tora 


APil 


SBicvicseccecateaces Sinee ness 
p. ERE 


; INITIALI 


;BR IF NO 


;RETURN TO USER 


034210 


‘aie THE DRIVE ? 


: 
Pag ies er 
: oe g “8 3 
-L  oocts g BE yy 
fe, i, AIL te Sg Ee 
ye og E St xe ty fa, we & 
SIME pasletis (ie ee 
gene ote fe becfived Pane 5 tou ye 
po teeta 
§ 
ray 4 i ae z z 
cena e aseitiens Exe Gace & B Bciepad 
gehgehshunas Gucvee aus Seberweslere. Fipanan 
g 5 ‘ 
z 5 5 
RQ URER B25 gfEs i. 
& 8 2228 2 288288 § Bz R $85 


ae ae 
3 Mie EO 


cf ii Ss Rorrrrrhn ir peeenirrrerreritetettetset rai teria: 


J13 
SUL7? 08:08 SINGLE /DUAL PORT RH/O/RMOS DRIVER (REV'1-0) SEQ 0164 


3 
3 
x8 





DZRMBA 
8860 000012 RMOS 
oes av (SP), RS PUT IT IN 
Be bbeiee nt st FRO FUT ae an ERROR? 
i BMI 1§ BR IF ERROR 
105761 034160 TSTB  ODRVACT(RI) :CHECK DRIVE’S STATE 
1 BGT SC11 °BR IF ORIVE ACTIVE WITH ORDER 
885 Ose7be 100210 000016 BIS #81715!B1T07!B1703, 16(Re) s INFORM USER OF ERROR RECOVER COMPLETION 
oe 4] 041204 1S: JSR RO, RD.RM ;READ ERROR REGISTER #1 
8870 14 RMERI 
887 SCS 
1 MOV (SP)+,RS AND SAVE IT IN 
737 O41S46 JSR PC, SVRH70 :SAVE RH70/RMO3 REGISTERS 
127% 000111 MOV #111,-(SP) ISSUE A DRIVE C 
8875 004037 041360 JSR RO, WAT. RM 
D00000 RMCS1 
40230 sca 
105 SCBA: RS WAS ” E" CONDITION =17 
BM 1§ ?BRANCH IF YES 
TS R2 ‘ANYTHING IN QUEUE ? 
8881 001447 BEQ SC7 “BR IF NOT 
3985 O55766 100240 000016 BIS #81 715!81707!B1T05, 16(Re) ; INFORM USER OF ERROR 
g8B4 OONO37 041204 15: ISR RO, RO.RM READ DRIVE STATUS REG. #1 
ap 
Bose Die MOV (SP),RS ;SAVE RMDS IN RS 
126 ROL (SP)4 :"ERR"=1? 
100011 BPL 2s ?BR IF NO--UNSAFE CLEARED 
77777 034170 MOVB 8-1, DRVSTA(RL) DRIVE IS UNSAFE 
1 041546 JSR PC : RH70/RMO3 REGISTERS 
Be92 D400 10000 000016 BIS aelTis!B1Ti2, 16(Re) ; INFORM USER OF UNSAFE ERROR 
Bs BAIR BE oom as; Br fries cme ct 
MCLs TteseE 177777 C3416 esl T(RL) :BETIVE ERROR RECOVER 
’ i- ° 
Be Gcls keri iiccch SiG NE RL ORSTRCRL)” OWL 
8899 se 2761 072460 O34262 HOV #30000. , TIMER(R1) :START 30 SECOND TIMER 
Boot 0401 bossa 037512 J SCY 
144 1 000016 BIS #81T15!BITO7!BI1TOY, 16(R2) ; INFORM USER OF ERROR 
15e 034160 SC? DRVACT(R1) sDRIVE IS IOLE 
1 042306 JSR PC, EMPTY DUMP THE QUEUE 
8905 ie 105761 034236 STB ULDFL G(R1) j UNLOAD AN RMOGRESS OR QUEUE? 
1 erst 034236 CLRB _-: ULDFLG(R1) “CLEAR UNLOAD FLAG 
m4 1 O34304 000016 1S: MOVB  ATABIT(R1),RMAS(RY) ;CLEAR ATTENTION BIT 
105761 170 TSTB —« DRVSTACR1) :1S THE DRIVE E ? 
8910 1 BMI 2s ‘BR IF IT IS 
8911 O40210 012746 000113 MOV $113,-(SP) “RELEASE COMMAND 
B3i¢ 4 04 ISR RO, WRT. RM “WRITE THE COMMAND INTO RPCS1 
1 RMCS1 *REGI INDEX 
8914 O4Ge22 040230 Sca “PARITY EXIT ADDRE 
8915 O40224 000137 037512 2s: JMP SCY ‘CHECK FOR MORE DRIVES 
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8916 


SEECPR EER BObUr ROR R See hie cee eR SER ESET R NESS 


3 
N“N 
be 





O40S42 


ne 


See 


000016 


000016 


SCle: 


1S: 


SC13: 


1$: 
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TSTB 
BEQ 


JSR 
JSR 
JSR 
TSTB 


34% 


= 
o 


SE 
Bas 


SSS ausSrasas 


3S 
< 


DRVACT(R1) 
1$ 


PC, GETREG 
PC,CI7 


PC, CI7B 
ULDFLG(R1) 
(R1) 


;1S DRIVE IDLE? 
: ope POINTER 

: THE PARITY ERROR 

s CONTINUE 

: THE UNCORRECTABLE PARITY ERROR 
“CHECK MORE DRIVES 

:"UNLOAD IN PROGRESS”? 

*BRANCH IF NO 

: Batve I ELAG 


(RI) 
ATABIT(R1),SRCHWT ;DOING A SEARCH OPERATION FOR 
“AN 1/0 COMMAND? 


2g 

PC 

#81707, 16(R2) 
SAVEFG 


BRANCH IF NO 

PC, SVRH70 : YES--SAVE OF THE RH70/RMO3 REG’S 
ATABIT(R1),RMAS(RY) ;CLEAR A ION BIT 
ATABIT(R1), SRCHWT “CLEAR IMPLIED SEEK SET 
R1 -WORD INDEX 
8-1, TIMER(RL) i STOP CLOCK 
PC, OPT aa Re ou T 
sc4 CHECK FOR Sone DRIVES 
R1,RMCS2(R4) SELECT DRIVE 
RMOS (R4) RERRS_ | SAVE THE FOUR REGISTERS THAT 
RMERI(RYS, 42 ‘WILL TELL US SOMETHING 
RMER2(R4) > RMERRS+4 
RMMR2(R4) | RMERRS 
RO, DRVINT sINIT. THE STATE OF THE ORIVE 
1$ : EXIT 
PC ;RE 
(SP)+ : OF THE STACK 
Sc PROCESS THE PARITY ERROR 
Ri “SETUP TO ADORESS WORDS 
g-1, TIMER(RL) :STOP THE TIMER 

S2( 


#BIT11,RMCS1(R4) 


a 

—S 

F3 
Aa, 
Sad 
z 
me 
32 
= 


TREQ Ss 
S'BIT14,16(R2) _; INFORM USER THAT DRIVE OFFLINE 


;SAVE THE REGISTERS 
;EMPTY THE REQUEST QUEUE 


;DVA SET ? 





MD-11-DZRMB AD/00 
OZRMBA.P11  27-JUL-77 08:04 
8972 O40SSO 001006 

8973 O40SS2 006301 

fe fee fel 
8977 040565 004737 

B78 040572 000137 B35e;5 
8980 

8981 

cone 


8888888 


NOU CW 


RSS 


Bee See CEEEESETS TEE 


nile 


Oade7e 


040674 


04071 


aces 


Ne 


Cen 


[=] 
_ 
oe 
_ 
o 


034210 


034235 


SI 


4§: 
3$: 


RPTMR: 


1$: 


3s: 
4§: 


BNE 
ASL 
JSR 


JMP 


MOV 
JSR 


MO 
RTS 
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us ;SET THEN CALL OPT 
810000. , TIMER(RI) 

PC, OPT START T NG REQUEST 
sc4 ‘PROCESS OTHER. ORIVE 


;/RMO3 TIMER ROUTINE 
CALL 


STIME.-(SP) ;ELASPED TIME IN MILLISECONDS ON THE STACK 
PC, RPTHR >CALL RMO3 TIME ROUTINE 
ACTDRV ;CHECK “ACTDRV & ACTSTR™ 
§ *IF NON ZERO EXIT 
#1,ACTSTR “SET “ACTSTR™ 
Ri ‘START WITH DRIVE 0 
— RONG IF HOO 
2(SP),TIMER(R3) COUNT THE INTERVAL 
2s -BR IF _NO SOFTWARE TIMEOUT 
PC, STO *CALL SOFTWARE TIMEOUT ROUTINE 
RL ti ‘MOVE TO NEXT DRIVE 
#8. ,R1 ;QUT OF DRIVES? 
i$ ‘BRANCH IF NO 
*RESTORE RO - 
ACTSTR ZERO ACTIVE SOFTWARE TIMEOUT ROUTINE FLAG 
(SP)+, (SP) sADJUST THE STACK 


;SOFTWARE TIMEOUT ROUTINE 
: THIS ROUTINE MUST BE ENTERED AT PRIORITY 6 
OR GREATER 


NOTE 


STO1: 


STO 
MOV 


#ORVNUM, R1 ;DRIVE NUMBER 
PC, STO ‘CALL 

Ra’ (ep) + BOVE Re 

R3,-(SP) SAVE RA 

R4: -(SP) SAVE RY 

RMADR. RY *GET ADDRESS OF “RMCS1” 

R1, RMCS2(R4) >SELECT THE DRI 

RO, RO. RM *READ “DRIVE STATUS REG” 

(SP)+ sIS “DRY"=1? 

STo2 *BR IF YES 

DPINT(R1) ‘TRYING TO INTIALIZE THE DRIVE ? 
ST0e2 BR IF YES 


SEQ 0166 


58 fuor bbices 


HL REKERSANAS Aad daid cai ut cues ieee rereectistsavats 





aaa 


SELPLLILISILE 


PEPLLPLPSLLLLLLLLEPPELELELSE 


mB Be ee be ep eee 


o> Os fr = — b= bb = Bs BB bb be ba 





St Pe b= be he eb bo pe ee 


RSaIURe COS ESHENS eS SAR ERE 


Sean 


z 
R 


eee Ee 


000010 


000016 
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SINGLE/DUAL PORT RH70/RMO3 


DRIVER (REV 1.0) 
FM ae PORT REQUEST FOR THE DRIVE ? 


TSTB (R1) 
ge” Ste 


MOV Re WAIT QUEUE 
cr ge Taree ON THIS DRIVE? 
IMP 5 y= HIE Nor BRST BON” On’ T_ BOTHER DRIVES 
JSR PC, GETRE 
1S: BIS agit ' 7109, 1602) aa gibitis 
J ; 
MOV s8tTOS. RMCS2(R4)’: iat 
CLRB DrvacTtRi) ;OR 
gL Re . me Te on SHER DRIVES 
STO2: MOVB RMAS(RY),RS READ ATTENTION REG 
BITB ATABIT(RI),RS IS ATTENTION FOR THIS DRIVE UP ? 
BNE T03 + YES--BRANCH 
TSTB = DPINT(R1) : TRYING Ne 10 INTIALIZE THE D DRIVE ? 
Oey BPROS(RID OF TOTANDING PORT REQUEST FOR THE DRIVE ? 
BNE S107 TROING FRR RESPONSE TO 0 REQUEST 
5709 *OTHER WISE EXIT 
ST03: TSTB ODPINT(RI) : INITIALI ING THE DRIVE ? 
1S ;BR IF INIT PENDING 
TSTB DPRQS(R1) :PORT REQUEST PENDING ? 
STO9 ‘BR RY it 
1S: HOV a-1  TIMER(R3) ;ST TIMER 
STOS: JSR pc cre G0 HANDLE THE PARITY ERROR 
STOb: cLRB OPI NTCRL) cag THE it INDICATOR 
HOV Pr THeko 3 erie 
TST -™ REQUEST ON OLE ? 
BEQ NO 


STO9 T 
Bis Sh I IS:OIT 8, 16che) , INFORM THE USER DRIVE NOT AVAILABLE 
ST07: MOV 8-1, TIMER(R3)  ;STOP THE TIMER 


CLRE DPROS(RI } ; CLEAR PORT REQUEST INDICATOR 
TST Ro” ; QUE FOR DRIVE ? ? 
BEQ STO9 *BR IF NONE 
MOV BBITIS'BIT2, 16(R2) _; INFORM USER OF PORT REQUEST ERROR 
ST08: JSR PC, EMPTY SCLEAR THE CUEUE FOR THE DRIVE 
JSR PC’ SVRH70 *SAVE THE REGISTERS 
ae ee 
MOV (SP)+'Re RESTORE Re 
MOV (SP)+;RI RESTORE RI 
RTS PC sRET 
ROUTINE TO READ A RH70/RMO3 REGISTER 
* CALL 
: JSR RO, RD. RM :GO READ A REGISTER 
: INDEX REG. INDEX FROM BASE 
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SEQ 0168 


oe ie — 
By 2 by.  . Seewk sity 
E wvagsave 6 BoEes nee 
Sg” aie ac © Shr of bx 
2b oe 
HES esi ot Py Gee ke =Ekeg By es gutl aoa 
So ae oc ed 
aot ea ee 
ae ee ee F 
‘ mae fet’; 6 5,8 sbi te 
a tems Ee eg 
: a SEE: a ede. us ee Bien 
: 
L S spserSicrecrnats Smamasteettcuesr ° a 
ee So yathiyeo 
i  weattenell 222 Boe SOO @ Sacucune 9 


8 
z 
zs wee Pe : : : = EE: : 


Se | 


SRNR CERN SEER ERE SAAAR SUE PANT HARES 


622,6656626622£60022£22222222222222222222 ep eA 


£5505555555005055 zzzz2z 
imams SSVBSBSS SS oa IIL LAVAS UAA GHG Be 


Fe eee eee een pee ean farm Foam en, pe Fuses Seam hom pam pam ean bon fom Joon, pan. fan foams fame an ban am fan pam an pan pan pom pan pan pan pan pan ban pam ban) 
PEPE PPA PSP PMO MMPI PPO PPPS MOO PEM K OMG KOSS 
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° 


SEQ 0169 
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PERFORMANCE EXERCISER MACY11 30( 1046) 


08:04 


Sati 


27- 


A0700 


11-0ZRMNB 
OZRMBA.P11 


Ne 


iNo=-—tonal 
{THE COMMAND BEFORE 
CREMENT THE ERROR COUNT 
AIN IF 


TRY 
; TRY_AGA 


;EXIT 


: 
sos (t Buwe 6 gi 3 oe 
Pee Eee fh Hee) 
we ae 


‘THE RH7O/RMOS 

'RETURN TO TH 

RE DURT THe PARI 
ICLEAR OFF THE STACK 
‘ADJUST FOR ERROR FREE EXIT 


f oan 
WORD T' 
PUT 
FORM 
; CHECK 
;BR_IF 
; CHE 
PICKUF 
REG. I 


Bowe §=6Seserctas 6 Reweeedaek ERS 
des a + 

Q : & 

SE i Tee Ce lw 

g = sdees ee Bee £5 coe 

ave SS&ES_. ae SS72, Ht. Feeeo 

re 2 

fabs Sofas Slne-ynbengentr talus ane 
#22 Se ze 
oat 6 § & 8 

& 5 oy 

RS is = 

Sz kz ee 7S 


8 
Mee ceviaNEs ONetecNs eecesuel en. 


eee eee ESE EE SSS Torah tnieeine tans 


A RRR a at ad wd wt ot 


= F665655550505050005000050605056556 


;ROUTINE TO SAVE THE RH70/RPO4/S/RMO3 REGISTERS AS PER DPB+14 


Ghee ta 
: ae 
Bade 
32 eis 
£ 
= s bes 
3 ygee ~Sannaq=es 


31 
10 
14 
041626 
041626 
ood200 000010 
041204 


mes 


PRO R Nee ake 


kk ed ed wd dd wed od td 


555656548454584 


PSP SF PPS PT RHRRARRGRDSSISSLBSSORALRLEKKK RA SSMBSBRSESSKSTARTER 


Fe pean fem fen pan fom fam fon fam fam fam fan fam fam pon fom pan pam fam fom fem foam foam ean een bon fos pom ans hom uae ham ean an Sean ate pam han ban fom ban fon ban an fon pan an pon pon pan banana han ban pen 
PAPPAEPPOMP PAPO MMM MMMM PMP PPP PMMA PMA OMG MMMM MMMM MMMM OOK NN” 


C14 


THE REGISTER INDEX 
;CONTINUE READING THE REGISTERS 
THE WORD READ 


THE UNCORRECTABLE PARITY ERROR 


RO - RS 
“TRE" BIT OF 


OonuMTwNwr 


Seeeeeee 


4 4 4 4 


ratatat={=}=t=}=) 


;ORIVE NUMBER TO R1 


REST 
; RETURN 


ROUTINE TO SET THE INTERRUPT WITHOUT GETTING A “TRE” 
RI 
tE 


iT 


-o 
waive OoO000000 


5 
Me S8885 


MOV 8ORVNUM 
PC, SET. 


CALL 


35 


_ 
ee of 
ene emenem ws 28 


041626 OO004% S$: 


aie & 
fee sae 
FALSBEASRNGENE 


son hen hen bene ben nen hen kee hee hem ben hoe hem! 


E5E555655E5855 


SSSS8888 


BREERRER 


&5556454 


BsaNenscle 


Sot US3s 


E ed ad eg et 


z 
& 
83 
e 
ee 
* 
ge 
- 
: 
a 

e 
Ss 


&6544468458 


: BESS isi sis sper orn na Sn a ee 


Oo-uUMNTWNwoN 


Sesesesy 


4 4 4 ht Ot 


=tafa{=t=fatat=} 


BS555555 


;QUEUE OUTPUT POINTERS 
-WORD QDRVO 


QOUTPT: 


& 
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- 


MD-11-DZRMB AO/O0, RMOS PERFORMANCE E 


a 
hcsioudn 
Se 2. § 
“REESE w “— By 
Fina s gle ge 
politike jE ES 
—— i ieee eS 
iu 4 
ts y = = 
5 Ed 4 a gesesB8x BES 3 
ESESEES SESEERREO eesssaes . if S982 Be onsseng y : 
GRENEEE EREREEEGE | HEEEEED = Uoscorsssmannaale | 
nt Sree 


041736 


a & 
Rama) Wie GRE) SS Se 
coe ieee Ee 896 


Cae Coa aS Ssh Eon neh Ge iciteiaehy 


3 
; 
35 


we 
1 
XY 


PRO RU MMU IU RR Se teatees coaden SUR OR IS UNIAN eNecTeS Soe oe : 


“ov 
rs 
— 


1 
042314 
O4e3e2 


O4e42e4 


é 


; 


ee 


sel 


BR 


i=] 
-— 
o 
— 
io” 
Poh 


eS 


SR 
ze 


oe 


105361 


PERFORMANCE EXE 
08:04 
041736 
041746 041766 
000010 041736 
041736 
041746 
oocode 041746 
041746 042010 
042006 041746 
041736 
041766 
041736 


RCISER MACYL1 
SINGLE/DUAL POR 
;CALL 
: MOV 
: JSR 
EMPTY@: CLRB 
ASL 
MOV 
ASR 
RTS 

; ROUT INE TO PUT 

; CALL 

$ MOV 

2 MOV 

. JSR 

: RETURNI 

: RETURN2 

DRVQUE: CMPB 
BEQ 
INCB 
ASL 
MOV 
ADD 
CMP 
BNE 
MOV 

1$: ASR 
TST 

2s: RTS 

;ROUTINE TO GET 

; CALL 

. MOV 

. JSR 

° RETURN 

GETREQ@: CLR 
TSTB 
BEQ 

1§ ASL 
MOV 
ASR 

2s: RTS 
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Ri ;DRIVE NUMBER TO R1 
PC, EMPTY 
QCNT(R1) ;CLEAR NUMBER OF ITEMS IN QUEUE 
QINPT(RL) , GOUTPT.RI) ;SET OUTPUT QUEUE POINTER=INPUT POINTER 
PC 
A REQUEST IN QUEUE 
SORVNUM, RI DRIVE MBER Cares 
: fait HERE TF QUEUE § FULL 
RETURN HERE IF ReeuEST IS IN QUEUE 
#10, QCNT(R1) ~ QUEUE FULL? 
BR IF TAKE RETURNI 
GCNT(RL) ‘I QUEUE COUNT 
Re, BOINPT RL) ;PUT THIS REQUEST IN QUEUE 
ajAPr RL), Re rop(ADD Dj IMe TO RESET THE PO THE POINTER 
GSTART (RL), ,QINPTIRI) ; : YES--RESET POINTER 
(RO)+ TAKE RETURN 2 
RO “RETURN TO USER 
THE “DPB™ ADDRESS OF NEXT REQUEST IN QUEUE 
SORVNUM, R1 ;DRIVE NUMBER TO R1 
PC, GETREQ ;G0 GET THE REQUEST 
R2="DPB” ADDRESS OF THE REQUEST 
*Re=0 IF NO REQUEST IN QUEUE 
Re 
@CNT(R1) :IS THERE ANY REQUEST IN QUEUE? 
BI :NO---BRANCH 
QQOUTPT (RL) , Re ;PICKUP “DPB” POINTER FOR THIS DRIVE 
PC RETURN TO USER 


;ROUTINE TO “POP” THE REQUEST FROM QUEUE 


. MOV 

5 JSR 

: RETURN 
POPQUE: DECB 


SDRVNUM, RI 
PC, POPQUE 


QCNT(R1) 


;ORIVE_NUMBER TO R1 
;CALL TO REMOVE REQUEST 
;R2=ADDRESS OF DPB REMOVED 


;DECREMENT QUEUE COUNT 


SEQ 0172 


? 


Sesusnessaaeane rasan ampeneapecacaaaecananaes f 


LPLLLLLLLP 


ee ed ee 
WONT CWO 


— 


— a 


aeaaes 
5O6G6 
PoeuaS 


; 


s § 


000075 
000076 


ASL RI 
MOV JQOUTPT(R1),R2 T THE ” POINT 
CLR QQOUTPT(RI)’ ope pooRESS Fron THE QUEUE 
ADD 82, QOUTPT (RI) UPDATE THE 
cH Yel ro ) 19. ag POINTER? 
te MOV QSTART(R1),QOUTPT(RI) ;YES--RESET THE POINTER 
: Age Ba ;RETURN TO USER 
5; SASREELERLLAE REESE ESSE ES LE LEE RRLE ERE E ELE LLAE LARA AEE EERE EEL LES 
.SBTTL DATA, CONTROL, & STATUS BLOCKS 
jp RRRERRELEEE ERE E ELLE EERE EE REE EE LEER EEE RERERE REEL ELLE ARERR AES 
BLOCK LOCATION EQUATE STATEMENTS 
SFNT = = 1 sFMT,HCI.ECI OR OFFSET CODE 
sport SEHT+2 ‘PORT 5 115 als, Al? 
Sn: Ets cay. 8 
.-* HT +8 : BUF ER ADOR OR REGISTER TABLE POINTER 
i ae tio TRACK 0D ebOrEsS OF LABT RES Abbe 
SCYL = SFMT+11 
SREG == SFMT+13 eClsieh STORAGE (IF ERROR) 
STATUS = SFNT+15 TATUS WORD (SET BY DRIVER) 
;DRIVE’S HISTORY AND CURRENT ne STORAGE EQUATES 
SWROL = SFMT+17 WORD COUNT (NOT 2’S COMP) 
$SSEC = SWROL +2 “SECTOR SIZE FOR CURRENT OPERATION 
SCODE = SWROL +4 :PRESENT COMMAND SELECTION CODE 
SPACK = SWROL +6 ; WRITE DATA PACK INDICATOR 
SPREVO = SWROL +7 “PREVIOUS COMMAND SELECTION CODE 
SeReva = ett parr ei TRACK, SECTOR, CYLINDER 
SOPERC = SWROL+16 j OPERATION ech 
a a ee se TOTAL COUNT (R & W) 
Shea” RSS Hora rie READ COUNT 
STOTAL 2 SWROL +36 At, ERRORS (ALL WYPES) COUNT 
aaeo SiRot sue He b° ERROE 
$SKI = SWROL +44 SKI’ OR 'OCYL’ ERROR COUNT 
ISPQ = SHRDL +46 : DeTE MISPOSITIONING ERROR S COUNT 
SFAIR = SWROL+52 ‘OPERATION QUEUE "FAIRNESS’ COUNT 
; INDEX EQUATES TO THE NEXT OPERATION PARAMETERS 
SNCODE = SWROL+54 ;NEXT OPERATION CODE 
SNPATC = SNCODE+1 ‘NEXT PATTERN 
SNSEC = SNCODE+2 NEXT SECTOR 


F14 
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MO-11-D 


OZRMBA. 


baaaes es tai 


FES RRIE 


RPRRRRiSae ated 


" ta Rng on EXERC ATAT CONTR conniee MACY11 1 OU ATUS BLO 


a 


Bessess Bee 
Non evoOr 


g 
? 


000005 
042726 
000266 


-77 08:07 PAGE 175 


ATUS BLOC 
SNTRK = +3 ; NEXT 
SNCYL = +4 ;NEXT C ere 
SNWROL = SNCODE +6 ; NEXT BUFFER SIZE 
SNEXT = SNCODE+10 ;PARAMETER SELECTION INDICATOR 


; INDEX EQUATES FOR MAXIMUM/MINIMUM ADDRESSES 


= SNCODE +12 MUM 
nine = ALS MINIMUM CYLINDER ADDRESS 
= MAXCYL+4 poe 
NINTRK = CYL+6 MIN MUM 
MAXSEC = MAXCYL+10 ;MAXIMUM SECTOR ADDRESS 
MINSEC = MAXCYL+1e ;MINIMUM SECTOR ADDRESS 
SF IRST = MAXCYL+14 ;FIRST OPERATION INDICATOR 


;BAD SECTOR/TRACK ADDRESS STORAGE AREA INDEX EQUATE 


SBDSEC = MAXCYL+16 ;BAD SECTOR STORAGE TABLE 
;DRIVE ID AREA INDEX EQUATE 
SDRVID = $BDSEC+100 ;DRIVE ID 
;RH11/RMO3 REGISTER EQUATES 
SRMCS1 = SORVID+10 ;RMO3 REGISTER STORAGE 
SRMWC 80s SRNCS1+2 
SRMBA = SRNCS1+4 
SRMDA = SRMNCS1+6 
SRNCS2 = S$RMCS1+10 
Seee1 =) SANGRIA 
i «2 1414 
SRMAS = 1416 
SRMLA = SRMNCS1+20 
SRMDB = SRMCS1+22 
SRMMR1 = 1+ 
sHHGN = 1350 
SRMOF = See tae 
SRMDOC = SRMCS1+34 
SRMHR == SRMNCS1+36 
SRMMRE = SRMCS1+40 
SRMERC = SRMCS1+42 
SRMECL = SRMCS1 
SRMEC2 = SRMCS14+46 


;BLOCK FOR DRIVE 0 
DRIVEO: .BYTE 0,0 
- BLKW 


- WORD +$RMCS1-SREG 
“BLKB  $RMEC2-SREG 


;DRIVE NUMBER 


;BLOCK FOR DRIVE 1 
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MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 176 SEQ 0175 
DZRMBA.P11  27-JUL-77 08:04 DATA, CONTROL, & STATUS BLOCKS 
ae 000 DRIVEL: -BYTE i, ,0 DRIVE NUMBER 
043012 043232 “WORD .+SRMCS1-SREG 
pate 043014 000266 "BLKB  S$RMEC2-SREG 
9481 
ae ;BLOCK FOR DRIVE 2 
9485 043302 002 000 DRIVE2: .BYTE 2,0 DRIVE NUMBER 
9486 043304 000005 "BLKW OS” 
9487 OvS316 043536 "WORD  .4+SRMCS1-SREG 
a168 3320 000266 “BLKB  S$RMEC2-SREG 
9490 
9491 BLOCK FOR DRIVE 3 
aug 043606 003 000 DRIVE3: .BYTE 3,0 DRIVE NUMBER 
9494 043610 000005 " BLKW 
9495 043622 O4404e “WORD  .+SRMCS1-SREG 
1% 043624 000266 "BLKB  $RMEC2-SREG 
9498 
9499 ;BLOCK FOR DRIVE 4 
Seo 044112 004 000 DRIVE4: .BYTE 4,0 DRIVE NUMBER 
3508 044114 gona "BLKW OS 
044126 346 “WORD  .+SRMCS1-SREG 
9504 044130 000266 "BLKB  S$RMEC2-SREG 
Seo 
9507 BLOCK FOR DRIVE 5 
1 000 DRIVES: .BYTE 5,0 DRIVE NUMBER 
Zr wile ots BE 
9511 O44432 O446S2 "WORD .+SRMCS1-SREG 
18 044434 000266 "BLKB § $RMEC2-SREG 
9514 
Io ;BLOCK FOR DRIVE 6 
$517 044722 006 000 DRIVES: .BYTE 6,0 DRIVE NUMBER 
18 O44724 O0000S "BLKW OS 
95 O47 36 O4S1S6 "WORD  .+SRMCS1-SREG 
0 740 000266 "BLKB  $RMEC2-SREG 
9522 
BLOCK FOR DRIVE 7 
045226 007 000 DRIVE?: -BYTE 7,0 DRIVE NUMBER 
045230 000005 "BLKW OS” 
O4Se42 045462 “WORD  .+SRMCS1-SREG 
9528 O4SO44 000265 "BLKB $RMEC2-SREG 
a5 
9531 ;GENERAL PURPOSE DPB - USED BY ’READHD’, ’RECALT’, ’OFFSET’,&’RTNCTR’ 
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PERFORMANCE EXERCISER MACY11 30(104%6) 27-JUL-77 08:07 PAGE 177 SEQ 0176 
08:04 DATA, CONTROL, & STATUS BLOCKS 


177776 GENDPB: .WORD 0,0,-2,CYLDER 
o4SSS2 -WORD 0,0,GENREG,O 
GENREG: .BLKW 24 ;REGISTER STORAGE IF ERROR 
Bs Lhlalalalalalalhahahalalalalalalalalalalalalalalalalalalislisisialsisinislslalalalalalslslsislsialslalalelalalelsisisisisielal 
-SBTTL ERROR MESSAGES 
jp RRRRRALRERRA RARER EERE SELL LAL AAA LARA AREA ALAA A LALLA RE RELA EE ELE 
-NLIST BEX 
O44i22 030067 O304S0 EM: -ASCIZ /RH70(11) INTERRUPT OCCURRED (RMAS = 0)/ 
125 042516 OS0130 ENe: -ASCIZ /UNEXPECTED ATTENTION OCCURRED/ 
115 OS1S01 O41123 EM3: -ASCIZ /MASSBUS PARITY ERROR (MCPE=1)/ 
115 051501 O41123 EM: -ASCIZ /MASSBUS PARITY ERROR (PAR=1)/ 
042101 051104 OSi1SO0S EMS: -ASCIZ /ADDRESS PLUG CHANGE BIT SET/ 
O44122 030067 O304S0 EMb: -ASCIZ /RH70(11) DIDN’T RESPOND TO ADDRESSING’ 
047125 047503 051122 EMIO: .ASCIZ /UNCORRECTABLE MASSBUS PARITY ERROR/ 
106 052101 046101 EM11:  .ASCIZ /FATAL MASSBUS PARITY ERROR/ 
O4¥2Se0 OSi1S22 051511 EMl2: .ASCIZ /PERSISTENT DEVICE UNSAFE/ 
117 O42S20 O40S22 EM13: .ASCIZ /OPERATION NOT COMPLETED WITHIN TIME LIMIT/ 
104 O44S22 O42S26 EM14: .ASCIZ /DRIVE WENT OFFLINE/ 
047516 OSi040 OSISOS EMIS: .ASCIZ /NO RESPONSE TO PORT REQUEST/ 
O42S10 O42101 OS110S EM20: .ASCIZ /HEADER CRC ERROR/ 
104 OS2101 020101 EMel: .ASCIZ /DATA CHECK (’DCK’) ERROR/ 
051127 OS2111 O2010S EM22: .ASCIZ /WRITE CHECK ERROR - DATA CHECK (’DCK’) SET/ 
127 O44Se2 042524 EM23: .ASCIZ /WRITE CHECK ERROR - DATA CHECK (’DCK’) NOT SET/ 
O42S10 O42101 O51105 EMe4:  .ASCIZ /HEADER READ ERROR - ’FMT’ BIT DROPPED/ 
042510 O42101 OS5110S EMeS: .ASCIZ /HEADER READ ERROR - HEADER COMPARE (’HCE’) ERROR/ 
106 051117 O40S1S EM26: .ASCIZ /FORMAT ERROR (’FER’)/ 
O42S10 O42101 OS110S5 EM27:  .ASCIZ /HEADER COMPARE (’HCE’) ERROR/ 
115 OS1Si1 O42S503 EM30: .ASCIZ /MISCELLANEOUS DRIVE ERROR/ 
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047116 
047151 
047226 
047270 


0S0S71 


00, RMO3 PERFORMANCE EXERCISER MACY11 
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117 
051104 
120 
051127 
047111 
0S1127 
104 
l22 
102 
104 
040S03 
10S 
10S 
102 
123 


053111 
040515 
OS3111 
0S3111 
0S3111 
O46S22 


020 
0S1 


cab 


om wu 


1 
05351 

042115 
047123 


DH16: 


-LIST 


-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
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30(1046) 27-JUL-77 08:07 PAGE 178 SEQ 0177 


/OPERATION INCOMPLETE (’OPI’) ERROR/ 

/ORIVE TIMING (’DTE’) ERROR/ 

/PARITY (’PAR’) ERROR AFTER OPERATION STARTED/ 
/WRITE CLOCK FAILURE (’WCF’) ERROR/ 

INVALID ADDRESS (’IAE’) ERROR/ 

/WRITE LOCK (’WLE’) ERROR/ 

/DATA CHECK (’DCK’) SET DURING WRITE CHECK COMMAND/ 
/RH11 OR UNIBUS TRANSFER ERROR/ 

/BUS ADDRESS OR WORD COUNT INCORRECT/ 

/DATA COMPARE ERRORS - NO OTHER ERROR(S) DETECTED/ 
/CAN’T MATCH DATA READ WITH A PATTERN/ 

ZERROR BIT(S) SET, BUT NO ERROR SIGNALED BY THE RH11/ 
/ECC LOGIC FAILURE - POSITION REGISTER VALUE NOT VALID/ 
/BUS ADDRESS AND WORD COUNT NOT CONSISTENT/ 

/SEEK INCOMPLETE (’SKI’) ERROR/ 

/PROGRAM DETECTED POSITIONING ERROR/ 

/ORIVE UNSAFE ERROR/ 

/RMAS/ 

/ORIVE RMDS RMERL RMER2 RMMR2 RMAS/ 
/DRIVE REG ADR DATA/ 

/ORIVE REG ADR GOOD BAD/ 

/SRMADR/ 


/ORV_RMCS1 RMCS2 RMDS -RMERL / 
/RMMR2 RMER2 RMECL RMEC2/<CR><LF> 


/RMWC RMBA RMDA RMAS a 
/RMDB RMMR1 RMDT/<CR><LF> 


7RMSN RMOF RMOC RMMR2 STATUS/<CR><LF> 


SEQ 0178 


27-JUL-77 08:07 PAGE 179 


K14 


SRMSN, SRMOF , SRMDC, SRMMR2, STATUS, 0 


ATTN,O 


.WORD S$RMCS1,SRMCS2, SRMDS, SRMER1 , SRMMR2, SRMER2, SRMEC1 , SRMEC2, 0 
-WORD SRMWC, SRMBA, SRMDA, SRMAS, SKMLA, SRMDB, SRMMR1, SRMOT ,O 


-WORD ORIVE,RMERRS, RMERRS+2, RMERRS+4, RMERRS+6,ATTN,O 
-WORD ORIVE,WRT.AD,WRT.WD,RD.WRD,O 
-WORD SRMADR,O 


. WORD 
- WORD 


ERROR MESSAGES 


DT1: 
-NLIST 


DT6: 
DT14: 


oode40 Oo0Ce42 OTIS: 


& 
= 


i 
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9549 


001216 034150 O341Se DTe: 


27- 


; 
F 
5 
¢ 
¥ 
% 
S 
a =z 
g 8 
& éz 
EE 
ae 
ray 


0S0676 


Pil 





MO-11-DZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 


g ee. 

a eg 8 

Nx uJ 
oe a eo at 
eee * M.A" sve gst 
By.d 8 o ue ~* “ “ sige. ‘; 
ees s gee etc, ee 53 he 
w = 
ae et 


NNNNNNNNNNNNNNNNNNNNNNNNNNG 
ed Od a dd dt dt dd tg a Pt 


SeeeeeeeeeseeneueeneuBeES 


SiG F GUST T I EcEaRT RS 


een end EXT coe Le Les Leelee Leo leaun Lenmnommn deme Lanes Lemme Lesm-Leam lesee-Leame eam dame daaaeed 
Joe e333 ee 


chad | auilacaeanaigtet ts 
sia t dateal arantceets 
SESE EERE EEE RU HEEREE 2 


Se ERIS MES Tn cee ethan 


th a tt ot wt tt 


SEsessessssessesssssesssesssss 


SEQ 0179 


L14 


ORMANCE ot mencéee 30(1046) 27-JUL-77 08:07 PAGE 180 


MD-11-DZRMB mo ane 


OZRMBA.P11 
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27-JUL 


MO-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 


OZRMBA.P11 


TO ENTER COMMANDS/<CR><LF><LF> 
T FILE ON / 
DETECTED ON / 


Pia : g 

7s: e me 

seb § feet gs 

< es SB z 
Sa Se TS Scaet =p 
sees & ase a 

ieai es. ee mg 

eee econ tees ifeges 
Baie Seopamecee Pa nn rrr 
an on Seta iis 

weESRGGNSREE ESEES GEREEEHEEEE, Gy Geeeete 


NN NNNANNNNNNN 
PF a 


} BERR eRSeeee 


a sieeniiies 
aaaaetecas 
pases 
ee 


prerrenerrrs ae 


sioreeesinee 23 EY 

Ute awe ISR Bs E 
SE ee 2 - i 

4 te 

d 


papas belt + Ned dey “RSS 25 
ag eee 
poner acme men anace 


i 
I 
I 
I 
I 
I 
I 
I 
I 
;PARAMETER ENTRY TABLE 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
as 
WORD 
WORD 
BEX 
ASCI 
ASCI 


ARL 
-NLIST 


OS44SO 047105 O42S24 O20i22 ASKPAR: . 
000040 : 


-LIST 
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OS4#474 
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-Pll 27-JUL-77 08:04 TELETYPE ME 
OS5460 005037 901330 CLR DATE+B. ;SET TERMINATOR Pe 
’ a wane 
Bey lent hn eo 
12605 MOV (SP)+,R5 “ENTRY ADDRESS 
74 Lies? 901332 MOVE  (RS)+/OPERID ST i D 
il 1333 MOVB (RS)+, OPERID4L :ST D 
tee Obl aae ye Ree ODER IDSS STORE THE LD 
115e3 rie MOVE (Re}$’ OPER TDS STORE THE { D 
112537 001337 MOVE §§ (RS)+/OPERID+5 ;STORE THE I.U 
001340 CLR OPERID+6 -SET TERMINTOR 
RTS PC : RETURN 
Oss53e 005015 047105 O42S24 ENTDAT: .ASCIZ <CR><LF>/ENTER DATE: / 
Gebiee O40S04 042524 
OS5546 000 
0 1 105 OS2116 OS110S ENTID: .ASCIZ /ENTER OPERATOR I.D.: / 
1 047440 042520 040522 
047524 O20le2 Oe27i1i 
3 027104 020072 000 
4 055600 EVEN 
g .SBTTL ROUTINE TO SIZE MEMORY 
: 3 SLSRELEGEE EEE AG EGE EES LEE EASA AE LELAA ALE RERA AREER LAA RAE LAEEE 
+ ISR on PC, $SIZE 
:¥$LSTAD WILL CONTAIN THE LAST AVAILABLE MEMORY LOCATION 
OS5600 O1004% SSIZE: MOV RO, -(SP) ;;SAVE RO ON THE STACK 
055602 010146 MOV R1;-(SP) :SAVE R1 ON THE STACK 
055604 O1s7e ooo004 MOV JSERRVEC,-(SP) :;SAVE PRESENT VECTOR PS & PC 
055610 01 000006 MOV JSERRVECH2, - (SP) 
055614 010600 MOV SP, RO --SAVE THE STACK POINTER 
SET THE ERRVEC PS TO THE PRESENT PS 
055616 104400 TRAP ;:PUSH OLD PSW AND PC ON STACK 
012637 o00006 MOV (SP)+, BBERRVEC+2 53 SAVE PSW IN a#ERRVEC+2 
bie7a7 OSS644 o00004 MOV #2$, JKERRVEC ;;SET FOR’ TIMEOUT 
12701 d20000 MOV #20000, Ri 3 ADORESS 
1 1$: TST (Rl) ;;TEST THIS SS 
1 TST (R1)+ ;;SIEP TO ADDRESS 
BR 1S :: TRY ANOTHER 
162701 oooo02 2S: SUB #2,R1 ::DROP BACK 
10006 MOV RO: SP RESTORE THE STACK 
012637 O00006 MOV (SP) +, J8ERRVEC+2 ; ;RESTORE ERROR VECTOR 
o1 990004 MOV (SP)+’ J8ERRVEC 
101 74 MOV R1, $LSTAD ; LAST 
012601 MOV (SP)+,R1 RESTORE R1 
012600 MOV (SP)+,RO ; ;RESTORE 
000207 RTS PC 
000000 SLSTAD: .WORD 0 ;;CONTAINS THE LAST ADDRESS 
-SBTTL - GET BUS ADORESS AND VECTOR ADDRESS FOR RH11 
THIS ROUTINE IS USED TO INSURE THE BUS ADDRESS 
"OF THE RH11 IS SETUP FOR THE PROPER 
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MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 185 SEQ 0184 
DZRMBA.P11 § 27-JUL-77 08:04 BUSADR - GET BUS ADDRESS AND VECTOR ADDRESS FOR RH11 , 
9750 ;IT WILL ALSO READ THE ADDRESS FROM THE TTY IF 
eS "NOTE: THIS ROUTINE DESTROYS RO-RY 
; CALL 
: ISR PC, BUSADR 
9756 : RETURN 
aes GaRb78 005737 001356 BUSADR: Is] GHGAOR s INPUT FROM TTY REQUESTED? 
Wit) 3 
9760 055704 005037 001356 CR CHGADR Wie her REQUEST FLAG 
ayes Beast Avs3R4 GBT 1s: nove RRRROR,RO.Os FIRST ADDRESS 
$763 055720 104401 OS6016 TYPE :"RMCS1=" 
9764 01104 MOV (RO), -(SP) *PRESENT RMCS1 ADDRESS 
9765 TOE TYPOC TYPE IT 
3766 104401 052716 TYPE  ,LINSP 2 SPACES 
9767 055734 104411 ROLIN ea GET THE ~ ae 
are GeETNB GASES? oscoNO nek ok ENTER AND STORE THE NEW ADDRESS 
$770 055744 000763 ; “ BR ape i ERRO EXIT 
arr feeres Phaaar Betass Mee vec 
a773 055755 011046 Ov tRO),-(SP) ; PRESENT RH11 VECTOR ADDRESS ON THE STACK 
9775 peeoee 104401 052716 TYPE ,LINSP i eBabes 
3776 iow ROLIN *READ THE ENTRY 
12601 MOV (SP)+,R1 “ASCII TEXT ADDRESS 
9778 004537 OS6040 JSR RS, CK. NUM : AND STORE NEW ADDRESS 
$779 055776 000763 BR 2s ?ERROR EXIT 
$780 056000 O1¢700 001270 3 MOV #SRMADR , RO FIRST ADDRESS OF NEW T 
9781 056004 012701 034316 MOV #RMADR, RI FIRST ADORESS OF WHERE TO PUT THEM 
3788 19 Siegel MOV (RO)+, (R1)+ BUS ROORE SS 
le Olopel MOV (RO)+? (R1)+ : VECTOR ss 
9784 14 000207 RTS PC : RETURN 
056016 0S1S03 O20061 MRMCSL: .ASCIZ @RMCSI = a 
ve beeas? o200%5 os3tie O41S0S MRHVEC: .ASCIZ @RHVEC = 2 
9789 056034 036440 000040 ne 7 
anes .SBTTL CK.NUM - CHECK NUMBER (OCTAL 
9792 : THIS ROUT INE Ne CHECKS AN ASCIZ STRING FOR LEGAL CHARACTERS 
9793 ;AND FORMS AN OCTAL NUMBER IN Re 
3c 
apee ; MOV #ADR, R1 sADDRESS OF ASCIZ STRING 
I7% ISR RS, CK. NUM : 
$797 RET ;ERROR EXIT 
9798 RET NORMAL EXIT 
$799 OS6040 01024 &x.NUM: MOV R2,-(SP) “SAVE Re 
9800 O0S6042 010346 MOV R3,-(SP) SAVE RO 
9801 bebo 010446 MOV RY; -(SP) : SAVE RY 
9802 012703 000006 #6; R3 ‘MAX OCTAL DIGITS IN THE NUMBER 
9803 0560S2 o0s002 CLR R2 ‘FINAL OCTAL VALUE 
9804 056054 112104 1S: (RL)+,R4 GET CURRENT POINTED BYTE 
980S 056056 001424 BEQ 3$ : BRANCH, IF TERMINATOR DETECTED 
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11-O0ZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 189 SEQ 0187 
-Pll 27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 
—s S we 
: 98328 : 
Sata , 
1544 18 Seee 8505 8638 e318 £838 6237 6287 6289 6311 6320 6334 
6657# 6671 6753% 6756 
arpts # 16% 6227% 6261% 6266% 6268% 6270% 6297% 6317% 66468 
I 2 8 6360 6365 6369 
000000 2561 2574 
100000 23488 
034304 3535 5909 6212 6228 6237 6287 6289 6311 6334 6657 6753 81628 98325 
8421 8527 8908 8927 8935 8936 8956 9042 
oo0000 2561 2565 
001342 26278 7228% 9547 9549 
= 000001 23748 
= 000002 23758 
= 23768 
= 10 23778 
= 23788 
= 000040 23798 
= 000100 23808 
= 000200 23818 
= QUO000U 2561 2568 
= OOU 2561 2575 
001502 27048 
001612 27618 3547 3589 3593% 3605S 3608 3631 3655 
900000 secr, Sol 
000400 ees4s 
1000 2285s 
bb} 95738 2 
c 1 8 1% 5377% S449 6030 6042 6054 6066 68078 
000010 23028 
T polets 57318 6401 
0 
IZ 001520 27398 6404 
= 1 22568 6534 6563 
00 = 1 ec468 2256 4353 4989 5110 
01 = 22458 2255 3728 8401 8649 . 
= ec44e 2254 3455 4402 4985S Sl S14S 6432 6440 
= 10 22438 2253 3821 4188 8867 9159 
= ec4es 2252 3821 8902 
= 000040 2e418 sseh 4289 8252 8669 8882 39037 
= 000100 es igs esre 3902 3903 3393 4008 4848 5620 6202 7107 8334 8392 8466 
= 000200 22398 2249 3714 3836 4848 8334 8601 8748 8867 8882 8902 8931 9191 
= 000400 22388 2248 3830 8334 
= 001000 22378 2247 9035 
1 = 000002 22558 6559 6573 
10 = 002000 22368 3724 3856 7236 8651 
11 = 004000 ee358 3722 3851 8299 8428 8620 8971 
le = 010000 eess 3720 3859 3903 3322 4414 4992 5608 8316 8334 8403 
36 8616 8635 8647 8660 8892 8894 9098 9154 3220 
13 = 020000 22338 3839 3865 4160 4256 6933 7243 8386 8842 9101 
14 = 040000 ec3e8 3701 3703 3728 3824 3827 3865 3983 4034 4078 4118 4224 4239 
8829 9063 9109 9113 $217 


A0/00 


MD-11-DZRMB 
OZRMBA.P11  27-JUL-77 08:04 
BIT1S = 100000 22318 
BIT2 = OOOO04 P 
BIT3 = 10 eebs8 
BITY = 22528 
BITS = 000040 22518 
Ss ! 
BHTS = Boasee eni3e 
BIT8 = OOO4OD 
BIT9 = 001000 suse 
BLKADR 002102 28078 
BPTVEC= 000014 22638 
BUFTBL 001700 27738 
BUSADR OSS& set 
BUSY ig 6145 
CFLAG 001360 26358 
CHGADR 001356 26348 
CHKADR 016762 3686 
CI 035570 8456 
C13 035676 8458 
cr 035776 8447 
kip = aeae Bou 
C17 036412 8388 
8574 
CI7B 036440 8619 
cI 036512 8617 
ee eee r oS ; 5 apt 
CKCLK 5865 
aa Bee EB 
CK 022604 5875 
CKERR 012440 3705 
CKFMT 10512 3835 
CKHCE 010706 3838 
CK. s 7227 
CK. 69898 
CK. DEC 1 69678 
CK:DIG 030110 6612 
CK.NUM OS6040 9769 
CK.OCT 027762 69498 
CLKFLG 001310 26188 
CLOCK 46 5871 
CLR = 23048 
CLROPSB 025212 3502 
Rhea rey 18 
CHC YL 001412 26528 
CMDAT 013064 4430 
Sea fig =a 
CMPARD {S43 3951 
CMPLMT 001472 26888 
CMPRES 017456 3566 
CMPRT 013426 444] 


3639 


3867 


3302 
8767 


3381% 
4926 


5879% 


RMO3 PERFORMANCE EXERCISER MACY11 30( 1046) 
CROSS REFERENCE TABLE - 


33%62 
8867 


6248 
3384# 
4938% 


6154 
3490 


8611 
8S04 
8614 
g0sS 


6088 


44.12% 
4431 
4487 


5275 
45158 


H15 


27-JUL-77 08:07 PAGE 190 
- USER SYMBOLS 


4006 
8882 


4103 
6254 
338S# 
4943 


6471% 
9758 


8512 
86168 


4402 
4496% 


4256 
8892 


8522 
8722 


4424 
4497 


8386 8398 
8902 8967 
6314 

3388%  3391# 
4949 49628 
6598% 6610 
8526 8537 
8752 8919 
442e5* 4428 
4500 


8401 
3035 


3398 


b626* 


S44 
9203 


4477 


3397 


7120% 


8550 


4481 


SEQ 0188 
8433 8436 
9070 
3398 4883 
7177% 
8SS4 8568 
4484* 4506 


115 


MD-11-DZRMB AQ/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 191 SEQ 0189 

DZRMBA.P11  27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 

CMPRX 013420 w38 4478S 4B 4499450745108 

CHSEC 001414 2e53e  44lbe 4434 = Mage | 4489) 491# = 4503 

CHSTR, 016734 W198 . 

Gre Soisrs Pe a 

ON 6100 95738 

CONTBL 002122 ios 5238 6400 

a el7is 26088 7203 73797389 SHS 957397079837 

CRLF = 21728 7389 

CYLDER 056150 4105# 4105 4109% 4143e S607 She Sb65 6539 9533 98328 

CYLINT 901446 26678 93507 SO%* Side 5106 6439 b44e 6454 6455 

BATAPK 029150 61 63598 

TAO 42 2913 2929 29328 

DATAL 002602 egy 2315 28182917, ag18 asd 2920 sel ase © 2923 HRY BRS (aR 

DATE 001320 Seon Bao % 96874 968% 609% 690% [91x 692% 9693% 96948 

DATEIS 053770 6325 95738 

Ock = 100000 23678 

DCKER 007312 3864 38758 

1_ og7ase 36988 4178 

=i 21788 2544 3300 

6172 62818 

DEASSG 05347 3562 95738 

DHi = OS0241 3224 95454 

DHI4 050416 Susy «95458 

DHIS 050521 S463 «95458 

DHI6 050620 5465 «95458 

DHe 050246 3231 3252 9545s 

DHS © -05032e 3238 9545s 

DHY 050350 3245 9545s 

DHe 050407 3259 95458 

DISPLA 001156 e5u4e 3308*  7235% 

DISPLY= 104414 3780 3800 3811 3883 3897 3918 3955 3%5 3987 4029 #94054 ©4074 
4114 4140 4155 4177 4183 4201 4211 4220 4235 4251 4271 4282 4301 
4319 43244325 432Hhe:«C«dBP eS 38H] HHH 434743504374 
: ue39 4544 SHS 44H HSS) GS 45545744577 4633 46384670 
4e73 «44676 «4879s? 48S HBS] 4093494717 4723 7B 4730 
4839 «5398S SHO1 «S418 44H SHG SHS] SSP S453 HSH HSS SHSB SHBG 
5 cu77w7a.—Cés«CSHSL SHH = S500 «5506 «S513 5527 5533 5539 «| SSH2 
Bsus. g5u7s«sS5uB)=S S552 S560 40 5563 5564 = 5567 «= 5575 S57B = 5580 §= 5583 «(587 
5591 5596 5599 5610 5614 S22 5625 S628 5639 5643 S652 
5654 5661 5664 ? 5669 5675 5678 5679 5ea8 495689 «= 5695 
5701  §707 §713 5720 S7ee 5730 5731 5737 S742 $745 S750 5755 5756 
5765 5770 778 «S78l1)«= S782 s«5781 «= S80S SMe «Ss 79798 

DISPRE 000174 24758 3308 

OLT = 100000 23148 

DONE 71g 3eeis 

Beinr B0s0e 8263 8266 0 BSHee# «8368 «S B13) 8838S 89S7 = BIS 02H 04990578 

DPRGS B0638 8374 B42ee Bye0e 8816 9028 0% 9051  9066# 

DRI Phos «7229 «9549 «= 95539556 

DRI 2807 6333 4969s «9608 «= 9609 10 ll «S12 S613 

ORI 2808 «94778 «16 S617 18S 9619 2S Shel 

ORI 2809 94858 = 96e4 %26 9627 %28 629 

DRIVE 2810 94938 %632 633 9634 9636 9637 





ae 
a 


034160 
ORVCLR= 000111 
ORVER 010460 
ORVINT 48 
Bor feel 

2326 
DRVSTA 034170 
DRVTYP 034200 
DRY = 
DSWR = 177570 
OTE = BionoD 
DTEER 11316 
DTU 034302 
DTOO = 000001 
OTO1 = 
pres s 
TO3 = 10 
DTOY = 
OTOS = OO0040 
ae = 000100 
Brag = 000200 
= 
Brie pebeze 
OT14 0S0742 
OT15 050764 
OT16 0S 1006 
OTe 050676 
OT3 050714 
Bre o80738 
DUNIT 1546 
DVA = ihe 
DvC = 000200 


SEREER 


= 
BRS 


eaten 
sieceretgts' 
B88 


oe 
& 
g 


95018 


9640 


95498 


EXERCISER MACY11 30( 1046) 
CROSS REFERENCE TABLE 


9641 


8S0S* 


6659% 


4627 


J15 


27-JUL-77 08:07 PAGE 192 
YMBOLS 


-- USER S 
or 
9667 
6721 6729 
8628% 98639 
8960 
B244%  824S# 
8434 8S563% 
6440 6443 
8629 8632% 
675S5* 
4628% 4464S 


9644 9645S 
ei 
9669 
95738 
8654% 8741% 8834 8865 8896% 
8246% 8247% 8257% 8289% 8298% 
8672% 8819 8827 8840 8890* 
80378 8290% 98305 8310% 98399 
8642 86SS 8657% 8666* 8730 
4647% 


8903# 


8331% 
8897% 


8673% 


8742s 


SE@ 0190 


8916 


8336 
8909 


MD-11-DZRMB AO/O00, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 193 SEQ 0191 
OZRMBA.P11 27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 


EEicxo” Soisee ER 
: 46 4666 


ee alee Bat Hr SE BT Ba oe wo us wt se ace 
3073 


By 


ECWRD1 001434 8 446Se# 4659% 4660% 4661 4663 4665 4667 4668% 4669% 4680 4683 4689 
EMPTY@ 042306 8626 8671 8768 8904 8969 9071 93128 
C= 00003C 2cbb8 98 32c87% 3288%  3316% 
1 04562¢ gee3 |: S458 
1 046124 3757 = « 95458 
EM11 046167 3763 95458 
is 3737 3746 95458 
1 3780 8=- 95458 
14 3731 3800 95458 
EMIS esse oil oa. 
4 ] 
Ba Re 
3382 486 95458 
EMe3 046531 39%5 95458 
a ae 
i: i ae 
E 045727 3237 =: S458 
EM3O0 8=—_: 047021 4054 9545s 
aed Wize 95458 
7116 41 95458 
047151 4183 9545s 
EM34 047226 4282 8389-95458 
EM3S 047270 4201 95458 
EM36 8=—-_-« 47325 Yell 95458 
Br fe, 86 Be 
EM4O 047441 4251 95458 
EM41 047477 4392 08=—_- 95458 
047543 4539 95458 
3 Bu7beM 4319-4324 9545s 
7671 4374 95458 
alles 3883 95458 
3 5477 95458 
EMS 046022 3251 95458 
ENSO nae 4271 95458 
4140 95458 


Pe 


agree 
pate 
ee 


4 
R 
? 


3488% 6700 6703 
9584 


98338 
6709 


eo 

38 

pages 
Sea 
naa 
£ RT 
3 os 


L15 


MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 194 SE@ 0192 
OZRMBA.P11  27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 
T # 
ENT DAV ees S678 
ENTID OS5551 97108 
ENTLMT eae 6423 95738 
h 
ox 6 peae 6708 6710 6749 «6757 #67618 
ne 
1404 374 r th 4440x B4e7 Biede 4572 39-4575 
1 3715 37208 3919 4840 
ERPROC 006350 3702 37148 
Bivect Bt 
22598 3297 3298% 3309% Se86S* S866* 5877% S892e 9726 9727 9731% 9732%  97239% 
FACTOR 0154 uBSOe 4O8S1x 48S3% 4854 #4862 48708 
EAtene piraes 26328 
FALPAR 3725 37628 
FER so 37648 
= 2356 
FILBUF Ol 3621 49848 
FISK 6779 «67808 
FMTER 011512 4070 «=—s« 42.198 
FMT16 = 010000 24188 
FORMAT p14? 26898 3676 5191 9585 
FOWTI 140 34848 
FOWTe 005200 3489 34928 
491 35208 
ebics 3950 3952 “216 43Se% 43S9% 4HOS* 4467 4517 4535 4S47% 4570 
23308 


ite Se 
Fi 
Fe 
F3 
FY 


ie 


4739% 4740% 4742 4759% 4760% 4762 4764 477S* 4776% 4778 4791% 
4794" 4795% 4796% 4798 4800 62e41# 6513% 6514 6515*% 6516%  6517% 
6528 6531% 6532 6561% 95338 

9535 95378 

65028 


5087 5104 5126 5206 67898 
966 9034 9060 9067 93488 
970 7972 7974 7975 7976 7977 7978 7979 


0 
Ww 
uv 
N 
“No 
ws] 
— 
@ 
@ 


4065 4100 
88 





_ 
=z 
” a 
rr 
— 
Se 
— 


rap 


g 


di Sa8 


z 
ses Vas 


Bs 


seiner Er 
a: 


5G 


tasesotase aacagaasa 288 
ee 
Ri SRRSReRaEEEee 


SSSR REMORSE 
: 


8 
a 


— — 


261 3364 
2362 
3850 42008 
6330 95738 
3532 3603 
zee 36618 
& 
3 
23538 
33936 60428 
ere SENN 
7 ih 
4304 4378 
3520 95738 
26848 3368% 
6199 95738 
2264s 
23058 
8249 987278 
24328 
U 9722 
61438 
6144 oes 
81158 8696 
2430 
teh 26098 
2650 4360% 
S606 95738 
SS27 95738 
S643 95738 
5688 5701 
ssa4 95738 
2e78 95738 
are Stor 
5639 95738 
5599 95738 
S679 95738 
5675 95738 
37793 
4154 4176 
4391 4538 
3747 3781 
4156 4184 
4S40 S414 
S425 S431 
S4s0 S4S38 


CROSS REFERENC 
609 6l21* 
roa 
6111 
3607 36418 
4037 4082 
3784 3804 
4123 4146 
4396 4578 
6116% 6127 
8697 8718% 

7383 
4417% 4416% 
95738 
SS41 SS46 
5627 5632 
3799 3810 
4182 4200 
53938 
3801 sais 
4202 421 
5792 
S498 


E TABLE -- USER S 


6122 


7389 
4549 


5551 
5653 


M15 


27-JUL-77 08:07 PAGE 195 
YMBOLS 


6124s 


60308 
3885 
4187 


6132 


9545 
455 1% 


5574 
5729 


3896 
4219 


3898 
4236 


9879 


9573 


5577 
5744 


3964 
4234 
3967 
4252 


3937 
4213 


9797 


5579 
5777 


3981 
4250 


3989 
4272 


3984 
4228 


9837 


5582 
5780 


4028 
4270 


4030 
4283 


3971 
4243 


5586 
58178 


4053 
4281 
4055 
4302 


4014 
4255 


5590 


4073 
4300 


4075 
4320 


4017 
4274 


5598 


SE@ 0193 


4038 
4286 


MD-11-DZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 1% SEQ 0194 
OZRMBA.P11 27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 


LINES 020650 37480 s3782—iBOS@— i«siB—is3899—iiHCi—i SSG Se 07BCi4L1G6 = 4157S HRP 


a 
BS 
: 





4253 4303 

L 4 4 4541 # 

we Ble 

L 4394 = S479—s« SS 2S 8 

LINESE 4185 $5398 

L 4 ] 

tines an He = a a es ke a one 4117 4158 4186 4223 

Ls, om so ee ig is ie oe. 

tice pe ore 4lel 4144 4227 4242 8 

L a8 Seat 

L is 

L 3689 3975S 40011 4010 4ON3 4088 4128 4164 4192 4Y4ebe 4e92 4308 57078 

tee 3891 3H6 86063977 4046S 4091 4131 4167 «#4195 4264 4295 4310 57138 

LI 3751 i133 3805 (3816 38323938 =Ss3956 2S 01S) = 4018 «= HON ss HON7Z—s4H0S8 =: 4089 
u3g7 Es we oes. 4193 4205 4214 42e9 4244 4265 4293 4311 

LINE7A 4147 = 4276 =—Ss S758 

He et, Soe 

Hy feces, St wrseemee 

tig iter Sbe2s«98;7398 

L 1141 S506 95738 

L NOCT 022210 4328 4331 4334 4337 4340 4343 4346 4349 4558 4561 4S64 4672 4675 
4678 4684 4720 4725 5489 $529 $532 5562 5566 S624 S642 
S645 5663 5677 5681 58018 

ee Bt oe ot 

L 1 $7 95738 

LINSP 0S2716 3453 4335 4341 4347, 4559-45620 iCsis4673s—Ci4HG7G—Cis7.—s HBS = 4HESB 4G 
4723 5491 SS4e 5547 5563 S664 5667 5678 5962 5967 5972 5978 
5 95738 9765 9775 

Lt 17 at $990 5997 6002 6007 6012 95738 

L 1351 a 

i es eee 

ee no 

r 13e5 Lat, ase 

Hi. Bie Bt 

L 1 98738 

Hs By 

LIN 4633 % 

LIN] 4638 95738 

LIN 4693 95738 

rin 4670 95738 

LINL1H 1 4717 =. 95738 

is ie Bt 

CINSS 051067 S452 95738 





B16 


MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 197 SEQ 0195 
DZRMBA.P11 27-JuL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 
Line A 021114 S501 S507 «=: $5738 
LIN3.3 Oeleee SSie 5519 55968 
LINS.4 Geles4 5520 46 $6068 
He a ee 
Hei Bi BRO 
LIN7M ath 95738 
Bey HL 5737 co 95738 
LIN7R pesnee 5750 738 
LIN7S 052016 5778 =: $738 
LIN7T QSe040 S742 0s «:9$738 
LIN7X  OQSe0S2 S745 95738 
LINGM fecig3 3318 4639 $791 95738 
LINSB 126 4544 95738 
LINSE OS2eS3 4574 95738 
LINSG 3355 95738 
LINSH 155 4546 95738 
LINSI 4326 95738 
LKPAR  O04S54 34028 
LOADRVY 057233 33e5 =—_- 98378 
isc. = aie 24318 
LSTAD 1354 26338 3378% 3381 3382 8=s_- 3478 
MAIN 005352 35308 3668 S317 5343 
MAINDA 005376 35378 
MAINI O0S524 3519 321 3S45 35718 6781 
MAINE O0S640 3981 360e8 
MASK 001346 ebe398 390e% 3920 3966 4O39% 4OS4e 4124% 4160% 4188% 4eS9# 4289 4824 4829 
MATCH 013750 pane 45908 o 
MAXCYL= 000106 * s50SS so% 5097 S302 6446 We7s Wee Weg W30- Wal 9432 3433 
9437 =. 9609 9617 %2eS5 %633 9641 9649 9657 9665 < 
mot, ite coaoe ot S3Me# 3395) 833978 86414 3416e Slee 5135 S137 S318 S320 S78 
MAXSEC= 000116 3509 S064 6450 94318 9613 1 9637 9645 S3 661 9669 
MAXTRK= 000112 3808% 5080 b44e% 34298 9611 9619 9627 9635 9643 9651 9659 9667 
BCPEMK 034314 8174s 9088 9135 
MOPE = 000400 23078 
HERRE BeNa01 6575 86696738 
MINCYL= 660110 3510% 5038 5100 5105 5108 5309 6447" 6461 34288 3608 9616 9624 
S640 9648 39656 3664 
MINSEC= 000120 3Sie# SOS8 5065 5067 S072 S308 639% 64S1# 6459 34328 Ble %20 4869628 
9636 S644 9652 9660 9668 
MINTRK= 000114 3511# S059 5081 $083 5088 5307 6449% 6460 94308 10 %618 3626 9634 
a4 1 3358 3366# cbse 6117% 6118 6120% 
T boven 81908 8716 
002152 ee 
= oo 8 
MOL. = 010000 2345s 
MRHVEC 056027 are3 a7eee 
MRMNCS1 056016 97868 
MXDLTA 034326 81878 8714 





SEQ 01% 


a 
a 


27-JUL-77 08:07 PAGE 198 


CROSS REFERENCE TABLE -- USER SYMBOLS 


C16 


ORMANCE EXERCISER MACY11 30( 1046) 


Be 


i 


9703% 9704* 
6364%  6368% 


9702 
6359% 


9701 
6143 


3875 3893 3S94# 6254s 
9698 9699%  9700% 
8940 8977 
3602 3624 3641 
S340% 6256 6258 6276% 


3530 


S Gugeed § Sepzopae 
AUR! Re Sebi ae eet | Teen. Mee AG iti 


a 


3928 
4776 
47758 
734 37908 
e302 
2903 
2904 
: $719 
6328 86331 
41528 
96838 
84198 
S433 
3358 
3369%  3516% 
6458 
41828 
sHle 
9878 95928 
95928 
95928 
98928 
95928 
95928 
95928 


ee ee ee ee 
UPSLCREL. 2 B55 FREED, PeeieoUie 8 OO « Boo UPRHTAITEE 


D16 





MD-11-DZRMB AD/O0. RMO3S PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 199 SES 0197 
OZRMBA.P11 27-SUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 
PAR2O 70 9587 95928 
PAR21 S59 9S9°% 
PeR3 abe 99328 17 . 
par ext o $5 SO £4 SY eee 
PERE 99S9e8 311 9619 9627 9635 9643 9651 9653 9667 
PAR7 ceieea 8 910 9618 9626 9634 9642 9658 9666 
PaRg # 13 39621 96293 9637 S645 9653 9661 [589 
PRES 22950 est een 9628 9636 9652 
aad # 671 
PA F 23038 
PATTEN 001510 27178 Sede S204 9581 
PCLOCK 001306 26178 S864% SBE9# 
PDONE 053331 95738 
PERIOD 8 
PGE = 23098 
py: ene 

= 
PIRQ@ = 177772 21768 
PIR@VE= 000240 22708 
POPQUE pris 8432 8600 8330 93638 
POSER O111 4108 41388 
PROCES 006260 36968 
all 014566 sat see 4287 4UBS9# 
Pain Goer va, 
PR1 = OOOO4O else 
PRe = 000100 21958 
PR3 - 700140 21968 
ee B1g78 6147 

= 
Be i iia eiee 

= 000340 ece00s 
PS = 177776 21738 2174 3363% 3464% 6147% 6203% 6920 6921+ 693S* 7129 8232 8233% 82622 
PSEL soe 8355 8357% 8410% 8420 8469% 98703% 
PSH os oreo 21748 
PURVEC= eon ace i. i. % 74S2e% 74S3% 74b2% 7468% 7480 7481 
pa Be zee lt ems TGs 7G Maze 74688 
@QORVO 9240 9251 3260 92728 
QORV1 O4e0S0 9e41 92S2 9261 92738 
pes mat oo Sy Sa St 

1 4 F 

Q@ORVS 042150 Geus 9255 9326S 92778 
anys atts 3247 9258 9267 95798 
QINPT yea 9e408 9314 9331% 9332% 9333 9335% = 
QOUTPT 041766 9eS18# 93314# 93 9365 9366* 9367% 9368 9370 
QSTART O4e006 92608 9294 9335 9370 
QSTOP O4e010 S2e6l% 9333 9368 
see = 042230 92e638 92808 

S 0S3S6& 6638 95738 
RANCYL 016506 50978 
RANPAT 016742 5117 S1498 





MD-11-DZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30 
CROSS REFERE! 


OZRMBA.P11  27-JUL-77 08:04 
1 
erets bi bese Sill 
RANTRK O164e4 ry 
RANMRT 017066 S04S 
RANXIT O16 14 
RATI rl P 
2 1 114 
ROOAT = 000171 246S8 
ROH) = 000173 eubbs 
= . 
ROL = Apaahs D283 
RD.ADR 041230 $090# 
RD.RM  O41204 8301 
RD. RM ou1226 90928 
RD:AMG OMLaeS apes 
RD.RMY 041356 9104 
oe oy 
READHD O1S04e 4027 
READIN= 000121 24sSa 
RECAL = 107 24508 
RECALT O14 4138 
RECALO 014770 47608 
REFAT QOEI oe ooo 
REFMTX 3673 
RELBUF 015554 3660 
RELSE = 000113 24S28 
Rebs 027556 S965 
68778 
RESREG= 104413 3009 
SVEC= 000010 22608 
RETRY 001350 26308 
4125 
RMADR 034316 * 
3100 
RMAS = OOODI6 82048 
RMBA = OOOO04 81998 
RMCS1 = OO0000 1978 
RMCS2 = 000010 82018 
383 
RMDA = 000006 82008 
RMDB = 82068 
RMDC = Bells 
RMDS = 000012 r 
RMOT = QO00026 rt 
RMEC1 = OOO044 82158 
RMERRS” GonisB Bat 
RMERI = Baoor4 4068 
RMERE = OOOO42 82148 


ae Se 


82Se% 


Fane ROBER 8 


NCE TABLE 


8832 
8327 


5229 


4093 
3688 


7921 


88 
8870 


(1046) 


E16 


27-JUL-77 08:07 PAGE 200 
USER SYMBOLS 


9684 9696 9767 9776 


8S86 86390 8704 8750 
9195 


S296 5359 $573 58388 


5995 6000 600S 6010 
79788 8668271 8404 8407 


3972% 3995* 4000 
430S* 4819% 4831% 4832 
8507 
9214 9781 
9041 
8428 8S03 8525 8567 
8971 9143 
B426* 8488x 8S530% 


8S08* 
B9sS*# 9020% 9037% #9097 


8943 s944*  894S* .. 8946# 
8944 9157 


8794 


6019 


9549 


88S9 


8635 
918S* 


8869 


6098 
8735 


SEQ 0198 


8884 


6103 


9215% 


F16 





MD-11-DZRMB AD/O0 RNOS PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 201 SE@ 0199 
DZRMBA.Pil  27-JUL-77 CROSS REFERENCE TABLE -- USER SYMBOLS 
RMHR = 8 
RMINIT a5 82318 
RMLA = 82058 8705 
RMMRI = a 
RNMRO = 
RMOF = x 85138 £318 8549 8553 8573 98577 
RvR = 9n00nr 23548 
RMSN = 000030 82098 
RMVEC 034320 sa? 3353" 81808 8248 8250 98357 
s 
Fr 4741 4761 4777 +4797 S020 6525 8356s 
15 3454 6431 49-9573 
RNOP = 000101 244g 
are o Siete | aaaO 
RTNCTR Tyg 47398 
11 S578 0s«S587—s«95738 
¢ 3423% 81308 8932 
SAVER 001400 26478 «4420% 4470% 4515 
SAVERS 1402 2E488 4421e 4471% 4526 4530 
G= 104412 4984 ««6146)—Ssi«wBS?s—(isi7BNS «=Ssié790G,—'—i‘é‘7977~«=«CéB—(ié‘éiSD:Ss—«‘iYHL—«<Cs«HH—Ss—«7PBSsCéBB—tC«é«@MzQY 
SC 037442 8734 8766 8772 987928 
SCMND 024716 6176 63068 
5CO4¥ = OOO400 24068 
S¢i1 = 000100 2404s 
SC¢10 = 001000 24078 
SCll1 O40260 1 8865 989238 
S¢i12 040370 8836 28 
SCi3.- O4O44O 8815 8818 89Ses 
SCe = 000200 24058 
ace0 = 002000 e408 
037506 88068 8810 . 
Sc4 037512 gg0gs geso 8853 98901 8915 8922 8941 98978 
S¢s 037524 8807 88138 
SCé 037714 8835 Basie : 
SCA }~8=-«s O44 8833 88788 
5¢7 040152 8881 8893 99038 
Sc8 040230 8861 8877 888 8914 89168 98951 
SDETAL 022752 S911 5931 S9S4* 
SEARCH= 000131 2457 
SECLT 001442 26658 3509 6450 
001370 ® 3367" 6101 6112% 6113 6115% 


ae 
z 
8 
3 
& 


wane 
8 


03 3405 3411 3415 Hels 
5 8394 


SET.IE O4i664 a sex ite 8468 8674 8800 92138 
at 00137e 26408 3364 6109% 6111% 
= suaa8 
SKIER 011752 3870 42708 
4474 6430 95928 
















G16 


MD-11-DZRMB AD/00, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 202 SE@ 0200 
DZRMBA.P11 27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 

TCK 20060 386¢—_—- 3979 4024 =: 4071 4111 4152 4174) = S3S38 
ect C3232 6084s 8421% 852e7% 8927 8936% 


1 


ataR 
STKLNT= 1 31758 
T 002476 59138 4595 
S10 Hebe gs a01Se 
er aE apse 
er 041042 e043 «0498 
ST05 041066 3023 90558 
Toe -O41074 gous «0878 
to? «41132 sou? 9065 
Tog «O41 162 3064 90718 
avrn7o Suisue ores Beet 
O41546 8621 
SMR «O011S4 25438 3283 
G40m 4483 
5783 «6180 
7687# 
SWREG 000176 24768 3307 
SUTIN 006620 5727-37798 
WO. = O00001 * 3672 
- i 55188 2228 
2 55178 3207 
2 5316s 3226 
Su03 = 000010 S3ie8 2206 
SMO = Saiug BD 
= 900040 55138 2203 
= 000100 55133 38 
= 000200 S5ii8 222 
Swos = OO0400 53108 2220 
Sw03 = 001000 55098 2219 
Sui = O00002 50278 
aute a obe = laaeg 
= 
die 8 
euis = 020000 5506$ 5396 
ewi4 = o40000 55048 
Suis = 100000 55038 3772 
uo = OOO004 5328 
Su3 = 000010 Sooty | 4453 
ws = 000020 Ppa 
SWS = O00040 53038 S558 
aus = Bone 55018 3674 
aia = pOpaOD 5 
ew3 = 001000 53198 
SYSTAT 053135 34 95738 
2 051136 5575 «588 





H16 


MD-11-DZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 203 SEO 0201 
DZRMBA.P11  27-SUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOLS 
t 710 6453 «95978 
Treteo fest 537-088 
TABLE] 054776 9698 «S168 
: oss044 9699-96248 
> ll 9600 «96328 
eeee 8 ge 
t opps Seeks 
- osea42 9604 S668 
TAB.XY= 001114 cise 2622 
s 53998 
TBE oe S52" gris 
THEAD 016270 Sous 4s SOS18 
TIMER 034262 Bluse ag40e ©«B4G3* 8607 86S3e B744e gaSSe ggg9x 9938 89S3e 897% 9991 99q3% 
goss 90S9% 9065s 
TITLE 057150 3320 «98378 
TKVEC = 000060 35688 7104" 7 105% 
TPVEC = OOOOG4 52E98 
TRAPVE= 000034 55678 32898 3290 3317% 
TRE = Q40000 55gg% 
TRFER 011652 5629 -42S08 
TRKLMT 001444 s 3608 6448 
TRNSWT 034230 $ Bugcx 8631" 8641 BES 8667" 8746 8747" 9030 
TRIVEC= 060514 22628 
TSTl 003640 5o768 
TYPDS = 104405 606 «6714 ~—«79708 
= 104401 3320 3406 3407 «3429«««3430 Ss 3437s 4443446 8 3450 3452 34583 
3453 3550 3Sh2 (3882 3738 «373737383704 
3763 «3764S s«3770S«s«780Ss«B791Sts«B792—S«O9798 Sai2,—s«&S 
sq73 Ss BG7B S490 «8997S «B02 Boi2 «090 «SOS SCiiODSt«i LS 
isi 6199 6301 pao? 6030 Ba Bae BMI e348 Basa 
433 ««B430s«é e438 «2B pees 4 BSESCi«‘«‘iC(‘é‘ézSSS:C«é«éiR’SC*«USL I 
EUS «BGM? Ss«éEED 1 e711 6712 
B751 +«b72?~Si«C«weBs«éweBe:S*C«<‘iSOOCéeeS?)«S711s«i7LDSs«=iéd@”~=*«é«‘CDDCOCS? At 
7164 «7169 Ss7173Sté«=719eSsté«‘aBSSC«C7UBNSCsC7'@GSC«71SSCt«é71983 5 
7594 «-7298«=«7308=««s«7383.=*ié«‘aSC7SS4=Ss«76300=s«“ 71S 7bG2StC7EGSSsC7E7B 
| 7689 7708 «79668 99 «97%lSsi«s 772 «49775 
TYPEST 022702 3663 59268 6315 6736 
TYPOC = 104402 5393 7a0s7kbSiC9K7H 97S 9774 
TYPON = 104404 75698 
TYPOS = 104403 MM 3585 SM 3767 79S SED 6398 OHET | GHTS GSKB S7B GEE (EE7 
TYPRI4 027706 sme So beens 
ULDFLG Oa4236 arose Beste 6366 «G31 BSb4 8627" ESI 8821 8905 8907s 8923 g90S* (90398 
UNIT 001344 Seong «Ge OC7SC7ES.SCiCaSGsSCSUSSC«iGS«OG7D2 «6730 
* 012106 S358" uzo08 
UNTAGN  DESOoe 211 6227 95738 
UNTHSG 052755 3582 6566 6876 6639 95738 
UNTNOT E297 «Ba1?«9E738 
Be me = , 
UPE = 020000 33138 
USI = 000001 5399 


MO-11-DZRMB AD/ 
OZRMBA.P11 
= 
Ww = 0001 
WAIT 001634 
WATPAK O25162 
es 
= 
= 18 
WCKER 
WCKHD = aes 
ie nk 
= 
WE 11464 
WL Os 
WRTDAT= 000161 
WRTHD = 1 
WRTPK 1 
WRTPK1 017524 
WRTPKe 017756 
WRIPKS O20002 
WRTPKY 02002 
le areas, 
WAT:RR 641360 
WRT.R1 O41444 
WRT.R2 041532 
WRT.R3 041536 
WRT.RY O41S42 
aT. 1544 
WRT. 1446 
T 16562 
ZROIND 001374 
SAPTHD 001100 
TAT= ##eEEE 
C 031634 
ae rttata 
1616 
dpe 031626 
08 001150 
00 1260 
Seite iit 
T OO1142 
SBDSEC= 000124 
sect 001174 
= 000006 
SCDW1 pei ged 
tt 
vest 
SCKSWR 032712 
SCMTAG 001114 
$Cm3 = 000000 
SCNTLC 031000 
SCNTLG 033321 


8 


RMO3 PERFORMANCE EXERCISER 
-JUL-77 08:04 


72038 
77438 


MACY11 30( 1046 
CROSS REFERENCE TABLE 


au88 
BE4S 


9164 


91508 


4469% 


I16 


) 27-JUL-77 08:07 PAGE 204 
-- USER SYMBOLS 


8s02 8510 
8875 8912 
91708 
9556 
4473 
3484 7658 
94378 =6S441 
4930 4936 
6563 6573 
73868 


8520 8524 8535 gs4e 
91358 
7748 

4987 S474 


4941 4945S 
6582 


gsS2 


5623 


SEQ 0202 
8566 8576 
5630 93878 








DZRMBA. P11 27- 


SCNTLU 033314 
SCODE = 000024 
SCOMND= 000002 
am TES 
001201 

SCYL = 000012 
$0820 033742 
SDE 033726 
001214 

001262 

mn 027270 
Bair Bee 
SOTBL 032672 
027260 

SENOCT 027244 
SENV. 01224 
SENVM  OO0le2S 
SEOP eb7ee 
SEOPCT 027236 


ee 
ow 

i bs 

bs be 

GJ 

i | 


: 
a 
Be 


ae 
28 
3 


bes 
= 


pi hey 


| hanya 


ABEE 
ERERSN 





7173 
4353 
S259 
: # 


7678 


77428 


6676 


7765 


6487% 


3404 
7340 


7242 


9106 


7433% 


9385 


67708 
94098 


7773 


700, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 
SuL-77 08:04 CROSS REFERENCE TABLE 


6488* 


7248 
7404 


7261 


9165 


7778% 


J16 


27-JUL-77 08:07 PAGE 205 
USER SYMBOLS 


4713 4856 
6407 8775 
5239 S243% 
3736 3744 
coos 4577 
eee FBI 
6647 6660 
7270 7289 
S226 52eS4# 
5%9 5975 
6489*% 6490% 
7333 7402 
7276 

9374 

9387 9388 
7783% 


4858 4498S) 4989s S193 
8777 = 8785* 93988 
S246 S331% S33S%  6400# 
3756 3762 3790 
4682 4694 4728 8=—s.: 4730 
B58! 2375 14 5633 
531 3 6090 
6661 6670 #8 6711 6727 
7234 7298 = 7384 
5301# 5309% 5540 
5981 5987 7077 78458 


S4418 S445 


7426 


9389 9390 9391 9392 


SEQ 0203 

S236% S244s 
6513% 98786% 
3798 4325 
6301 258g 
6735 6750 
7689 9761 
6461%  6514# 
9396 





MD-11-0ZRMB AO/O0, RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


OZRMBA.P11 


ie Br 


a 


88 
a 


888 


BEST Rae 


g888 
R 


SRS 


ee 
BB 2F 


ca 
RS 


ne 


8 
-_ 
Tv 
_ 
rm 


SoU ee era eta 
he 


ae 


27-JUL-77 08:04 


74878 
7748 
7250 
7261 


eSa28 


7764 


7273 


3311 


27-JUL-77 08:07 PAGE 206 


3330 


77848 


7248 


5196% 


S2S4 
34238 


5956 
6258% 
6780 


6709 


7333 


S224 5236 5237 94178 


Wels 


6740 94038 


93998 


94048 


9418 


SEQ 0204 


9419 





L16 


MD-11-DZRMB AO/O0, RNO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 98:07 PAGE 207 SEQ 0205 
DOZRMBA.P11 27-JUL-77 08:04 CROSS REFERENCE TABLE -- USER SYMBOL 
SPREVA= S026 secee oe he S230 S2e3l% S23e% 5297% Se96e S299% S581 5s58S 5589 5S97 
he Bbo6s ecert S223% Sel S248 Se9s* S428 8782x 934008 
= 
16 748S8 
SPWRON 032056 3291 74528 7480 
SPURNG 032212 74838 
oiepe 
# 71 7261 7389 7708 
5129 5209 5287 77608 
SROCHR 033174 772e1# 7975 
Ag rT titii 
SROLIN 030510 71468 7976 
Ts BEEEEE 
= 000001 77428 
= 000052 4B6e% 4863% 5751 6700 6703 94068 
SREG = 000014 6389 93918 9471 9472 9479 9480 9487 9488 9495 9496 9503 9504 9511 
Te 9519 9520 9527 9528 
SRESRE 033510 78198 7978 
SRETRY 015134 3887 3973 4041 4086 4126 4162 4190 4260 4290 4306 48158 4833 
vo poie7o 26108 3345* 3346 3352 9553 3 9780 
= 94Se8 9565 
SRMBA = 000240 dare 4609 4640 4661 4701 4721 4850 S475 $528 S629 S640* S641 34478 
SRMCS1= 000234 3699 3701 4365 S222 5295 S422 8782 g445# S446 S457 9448 g44g 9450 
cei i am fe ne ee et Se ee Se Me OM 
SRNCS2= 000244 3354 4034 «(4078 «ssi «Ss«4204 = s«43 99 436795498 «S61 
SRMOA = 000242 5300 5561 S612 43 S844 94488 9565 
sree = S644 94548 9565 
3 70 3678 4106 Ge 4 Ol SS65 5600 SB4s 94598 9569 
at's Be p00¢ 5/03 ae. 3856 94508 9561 
Sere c= 000500 Sie 3877 462S S675 94638 9561 
000302 3879 ort 5680 6351 6394 94648 9472 9480 9488 9496 9504 9512 9520 
SRMERI= O0002S0 3830 3833 3836 3839 3842 3848 3851 3854 3859 3862 3903 
39322 3962 4006 4008 4063 4098 4369 4826 4829 94518 9561 
seEnes 3865 3867 4371 94628 9561 
= 94608 
= 94538 9565 
= 8 9565 
94618 9561 9569 


3353 3 
4703 5472 5531 S646 94468 9565 


7471% 74898 
5394 5999 6004 6009 6018 6092 6097 6102 70758 


5174 S227 S2eS3* 5300% 5308* 5550 6459 6524%* 6531% 6532 
3289 3291 3293 3295 3327 6762 7227 7258 7260 764S 











MD-11-DZRMB AD/O0, RMO3 PERFORMANCE EXERCISER MACY11 30( 1046) 
OZRMBA.P11 


I 97248 
seize = Sapees 5779 6016 6056 6058 934108 
Ts 6014 5035 6034 94088 
= pase yy 44eg 4613 4705 
= 
rae 4637 S741 5749 S57S4 5769 
VPC = 10 24868 2491 
SSWR = 122000 21288 139 2143 2144 2145 
soune 001226 orene re ; 
Atte: 000016 yy 343 3714 3722 
3997 4764 4800 4816 4822 
s 739808 
TEIN 1210 25658 3277% 6780 
tke dolles seus cich beat Foe (7888 
TGNT hence 3326 3482 71048 é 
Zay 160 sodae $20e% 7107% 71e1% 7131% 
TK 104 71148 
1 2 elese 2139 3275 32778 
TNPWR 56 78S2 7853 78738 
TAL= 574 6013 6080 6082* 6683 
1168 2eS48e 7378% 7389 
G ll a 7389 
TPS 1164 25478 7389 
TRANS= OO0046 4yeS4e 48SS*# 4860% 4861% 5746 
TRAP O34062 3683 79438 
TRAP2 ae 7 
TRK = ll 4791# Sil 5305 S307%  5SS4S 
STRP = O0000iS 79588 79678 79688 79698 79708 
737398 79808 
TRPAD 034116 73948 739658 7980 
STM 1104 25118 
Ma 1116 2525 7235 7261 
IN 7148 7149 7161 7184 7198 
TYPEN= #42422 7971 
STYPOS 75848 7970 
T 1326 6323 6936 73278 §=67421 7958 
c 1540 7357 7364 7371 7376% #7377 
T Bal 80e 7382 7384 73878 
4 75248 75967 
032300 7523 75268 7969 
TYPOS 75198 7968 
i 146 25688 2626 
™ lll 25138 
001230 25758 
atl 001254 26008 3340 3342 
 BEss ! 
= uy 4411 4611 4702 4860 
4946 4988 %# S$318%  5319% 
9339 9400 9401 9402 9403 
9412 9413 9417 
= 000004 4796% S2S6# * S5320% 5321 
= 000000 67728 
SOFILL 032463 7520% 7524% 7534 75698 


M16 


S2S8* 
5774 
2146 
7223 
3724 
4848 
7654 
7133% 
9407 % 


94058 
6460 
79718 
72028 


7966 
7694 


$322 


S261# 


— 5819 


253 
7236 
3726 
5469 


7671 
7643 


6515% 
7972 


4893 
5471 
9405 


S324 


5329% 
69048 


3277 
Te 


3728 
S620 


7728 
7652 


93898 
79738 


4695*# 
S626 
9406 
5326% 
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7731 
7668 


7974 


9407 
64O4* 


5649 


6694 
7289 


3821 
93928 


7692 


79758 


4897% 
6403* 
9408 


640S* 


6406* 
6762 
7261 


3912 
9569 


7723 


79768 


4928 
93968 
9409 


6516# 


SEQ 0206 
b409# 93978 
6772 6778 
7486 
3915 3932 
7729 
79778 «79788 
4937 4942 
9397 9398 
G10 = Hil 
93868 


MD-11-DZRMB AD/O0 
OZRMNBA. P11 uF 08:04 


SYOCAT= ####82 U 
. = 057527 


TA= ####ee U 
= 001100 


B01 


e4se8 
3606 


sa4 


$2788 
S95 86994968 
9S288 


RMO3 PERFORMANCE EXERCISER MACY11 30(1046) 27-JUL-77 08:07 PAGE 209 
CROSS REFERENCE TABLE -- USER SYMBOLS 


SEQ 0207 
esois 2038 215 2228 
25 8 
Fa Fosse Passe | 760 
W708 8 Hi71 7es §=6H4788 
$03 604s 6108 Sil 
98738 97148 9833 


COl 





: a 

i ae 

¢ we Og 

eo ok ME oF és 
. SF MS FE 
[ee ee 
of «ee eg ee 
: me BE 8 of & 
ed oF BM oF OF OB 
2 ee 
, @se@ ke Ss ¢f : 
ne 
OS MERGE MM GOee ee me celal 
’ BESS OWES evevan’ 6 Srevevarry Baus 
ok SGEEEGEESE i soeGnghecoedg® REED ErPeoEECRouaaoadsahas 


DOL 


Sy or on eS apie Cen iee paeyi i Sr e007 PAGE 212 SEQ 0209 


? 


canted 


SRS IRUNIaE 


Bas 





BSBE 
35 


ERRORS DETECTED: 0 


OSKZ: DSKZ: DZRMBA. SEQ/NL: MD: NC: CND: TOC/DOC/SOL/CRF=DSKM: RMDRV4.P11,DSKM:DZRMBA. P11 
RUN-TIME: 35 27 2 SECONDS 


